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.