NAME

Device::SCSI::CDROM - Perl module to control SCSI CD-ROM devices

VERSION

version 1.004

SYNOPSIS

use Device::SCSI::CDROM;
# use the same way as Device::SCSI but with extra methods.

DESCRIPTION

This is an incomplete package that may ultimately provide device-specific support for CD-ROM and other read-only units. The API is poor and may change at any time.

METHODS

disc_info

my($first, $last) = $device->disc_info;

This returns the track numbers of the first and last track on the CD inserted in the drive.

toc

my $tracks=$device->toc;
my $first=$tracks->{FIRST};
my $last=$tracks->{LAST};
foreach my $track ($first..$last, 'CD') {
    my $trackstart=$tracks->{$track}{START};
    my $trackend=$tracks->{$track}{FINISH};
    # use these values
}

This reads the Table Of Contents on the CD, and returns a hashref containing information on all thr tracks on the CD. The keys are:

FIRST

The number of the first track on the CD.

LAST

The number of the last track on the CD.

CD

A hashref with keys START and FINISH mapping to the block numbers of the start and end of the CD.

(Numbers 1 ... 99)

A hashref with keys START and FINISH mapping to the block numbers of the start and end of the track with the same number as the key.

AUTHOR

Peter Corlett <abuse@cabal.org.uk>

COPYRIGHT AND LICENSE

This software is copyright (c) 2011 by Peter Corlett.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.