SDL::CDTrack -- SDL Bindings for structure SDL_CDTrack

Core, CDROM, Structure

 use SDL;
 use SDL::CDROM;
 use SDL::CD;
 use SDL::CDTrack;

 SDL::init( SDL_INIT_CDROM );

 my $drives = SDL::CDROM::num_drives(); 

 if( $drives > 0 )
 {
  my $CD = SDL::CD->new(0); #first drive's CD

  if( $CD != NULL)
  {
	if( $CD->status != CD_TRAYEMPTY )
	{
	my $track = SDL::CD->track(0);
	}
  }

 }

 SDL::quit();

 $track->id() # 0-99 

Track number

 $track->type() # SDL_AUDIO_TRACK or SDL_DATA_TRACK 

Type of track

 $track->length() 

Length, in frames, of this track

 $track->offset()

Frame offset to the beginning of this track

SDL::CDROM, SDL::CD