File: single_test.pl

package info (click to toggle)
libhtml-mason-perl 1%3A1.26-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 1,636 kB
  • ctags: 1,260
  • sloc: perl: 13,880; sh: 154; makefile: 47
file content (13 lines) | stat: -rwxr-xr-x 264 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl

use strict;

foreach (@ARGV) {
  $ENV{MASON_NO_CLEANUP} = 1;
  my @command = (-e 'Build' ?
		 ('Build', 'test', "test_files=$_", 'verbose=1') :
		 ('make', 'test', "TEST_FILES=$_", 'TEST_VERBOSE=1')
		);
  print "@command\n";
  system @command;
}