NAME
InfoSys::FreeDB::Entry::Track - FreeDB entry track
SYNOPSIS
require InfoSys::FreeDB;
require InfoSys::FreeDB::Entry;
# Read entry from the default CD device
my $entry = InfoSys::FreeDB::Entry->new_from_cdparanoia();
# Create a HTTP connection
my $fact = InfoSys::FreeDB->new();
my $conn = $fact->create_connection( {
client_name => 'testing-InfoSys::FreeDB',
client_version => $InfoSys::FreeDB::VERSION,
} );
# Query FreeDB
my $res_q = $conn->query( $entry );
scalar( $res_q->get_match() ) ||
die 'no matches found for the disck in the default CD-Rom drive';
# Read the first match
my $res_r = $conn->read( ( $res_q->get_match() )[0] );
# Write the track titles to STDERR
use IO::Handle;
my $fh = IO::Handle->new_from_fd( fileno(STDERR), 'w' );
foreach my $track ( $res_r->get_entry()->get_track() ) {
$fh->print( $track->get_title(), "\n" );
}
ABSTRACT
FreeDB entry track
DESCRIPTION
InfoSys::FreeDB::Entry::Track
contains information on FreeDB entry tracks.
CONSTRUCTOR
- new( [ OPT_HASH_REF ] )
-
Creates a new
InfoSys::FreeDB::Entry::Track
object.OPT_HASH_REF
is a hash reference used to pass initialization options. On error an exceptionError::Simple
is thrown.Options for
OPT_HASH_REF
may include:extt
-
Passed to set_extt().
offset
-
Passed to set_offset().
title
-
Passed to set_title().
METHODS
- get_extt()
-
Returns the track extt.
- get_offset()
-
Returns the track offset.
- get_title()
-
Returns the track title.
- set_extt(VALUE)
-
Set the track extt.
VALUE
is the value. On error an exceptionError::Simple
is thrown. - set_offset(VALUE)
-
Set the track offset.
VALUE
is the value. On error an exceptionError::Simple
is thrown. - set_title(VALUE)
-
Set the track title.
VALUE
is the value. On error an exceptionError::Simple
is thrown. - write_fh(FILE_HANDLE)
-
Writes the entry to the specified file handle.
FILE_HANDLE
is aIO::Handle
object. On error an exceptionError::Simple
is thrown.
SEE ALSO
InfoSys::FreeDB, InfoSys::FreeDB::Connection, InfoSys::FreeDB::Connection::CDDBP, InfoSys::FreeDB::Connection::HTTP, InfoSys::FreeDB::Entry, InfoSys::FreeDB::Match, InfoSys::FreeDB::Response, InfoSys::FreeDB::Response::DiscId, InfoSys::FreeDB::Response::Hello, InfoSys::FreeDB::Response::LsCat, InfoSys::FreeDB::Response::Motd, InfoSys::FreeDB::Response::Proto, InfoSys::FreeDB::Response::Query, InfoSys::FreeDB::Response::Quit, InfoSys::FreeDB::Response::Read, InfoSys::FreeDB::Response::SignOn, InfoSys::FreeDB::Response::Sites, InfoSys::FreeDB::Response::Stat, InfoSys::FreeDB::Response::Ver, InfoSys::FreeDB::Response::Whom, InfoSys::FreeDB::Response::Write::1, InfoSys::FreeDB::Response::Write::2, InfoSys::FreeDB::Site
BUGS
None known (yet.)
HISTORY
First development: September 2003 Last update: October 2003
AUTHOR
Vincenzo Zocca
COPYRIGHT
Copyright 2003 by Vincenzo Zocca
LICENSE
This file is part of the InfoSys::FreeDB
module hierarchy for Perl by Vincenzo Zocca.
The InfoSys::FreeDB module hierarchy is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version.
The InfoSys::FreeDB module hierarchy is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with the InfoSys::FreeDB module hierarchy; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA