File: runall

package info (click to toggle)
libcdio 2.2.0-4
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 16,140 kB
  • sloc: ansic: 39,407; cpp: 2,556; sh: 1,263; makefile: 826; yacc: 324; ruby: 116; perl: 34
file content (13 lines) | stat: -rwxr-xr-x 190 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#!/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");
}