pjs/tools/tests/win32/smoke.pl

12 строки
279 B
Perl

#!/perl/bin/perl
@ARGV[0];
$BaseDir = $ARGV[0];
#print ($BaseDir, "\n");
system ("apprunner.pl \"$BaseDir\"");
system ("url.pl \"$BaseDir\"");
system ("mail.pl \"$BaseDir\"");
system ("smtp.pl \"$BaseDir\"");
system ("pop3.pl \"$BaseDir\"");
system ("Intlurl.pl \"$BaseDir\"");