Initial commit of perl test script for travis builds
This commit is contained in:
parent
6e5d9272e0
commit
2b789332c8
|
@ -0,0 +1,21 @@
|
||||||
|
#!/usr/bin/env perl
|
||||||
|
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
|
my @tests = (
|
||||||
|
'zmpkg.pl start',
|
||||||
|
'zmfilter.pl -f purgewhenfull',
|
||||||
|
);
|
||||||
|
|
||||||
|
sub run_test {
|
||||||
|
my $test = $_[0];
|
||||||
|
print "Running test: '$test'";
|
||||||
|
|
||||||
|
my @args = ('sudo', $test);
|
||||||
|
system(@args) == 0 or die "'$test' failed to run!";
|
||||||
|
}
|
||||||
|
|
||||||
|
foreach my $test (@tests) {
|
||||||
|
run_test($test);
|
||||||
|
}
|
Loading…
Reference in New Issue