#!/usr/bin/perl -w
use strict;
my @tests;

if (@ARGV) {
 @tests = @ARGV;
} else {
  @tests=qw(t1.cue t2.cue t3.cue);
}

foreach my $cue_file (@tests) {
  system("../cueparser $cue_file");
}
