'src-dir=s' => \$src_dir,
) or die "could not parse options - $!";
-if (!defined $src_dir)
+if ( !defined($src_dir) )
{
die "--src-dir was not defined";
}
local $ENV{SRC_DIR} = File::Spec->rel2abs($src_dir);
local $ENV{COOKIES} = $cookies_list_str;
+my $IS_WIN = ( $^O eq "MSWin32" );
+
sub do_system
{
my ($args) = @_;
die "Running [@$cmd] failed!";
}
}
-do_system({cmd => [$^X , "$src_dir/tests/trailing-space-and-CRs.pl"]});
-do_system({cmd => ['prove', glob("$src_dir/tests/t/*.t")]});
+
+do_system(
+ {
+ cmd => [
+ 'prove', ( $IS_WIN ? ("-v") : () ), glob("$src_dir/tests/t/*.t")
+ ]
+ }
+);