#!/usr/bin/perl

use lib "lib";#d#
use Convert::CD::Cue;

my $toc = new Convert::CD::Cue path => $ARGV[0];
my $cd = $toc->read;

warn $cd->as_string;