You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
libtqt-perl/PerlTQt/tutorials/runall.pl

9 lines
220 B

#!/usr/bin/perl -w
# Use the tutorials as a test suite
@tutorials = (sort(glob("t?")), sort(glob("t??")));
for $tutorial (@tutorials) {
chdir($tutorial) || next;
system("$^X -w $tutorial.pl");
chdir("..");
}