ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Convert-CD/eg/dump
Revision: 1.2
Committed: Wed Jun 11 10:50:55 2003 UTC (23 years, 3 months ago) by root
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +2 -3 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.1 #!/usr/bin/perl
2    
3 root 1.2 use Convert::CD::Analyze;
4 root 1.1
5 root 1.2 my $toc = new Convert::CD::Analyze path => $ARGV[0];
6 root 1.1 my $cd = $toc->read;
7    
8     warn $cd->as_string;
9    
10