| Subject: | 03-encrypt-files.t waits for action on Windows |
system( sprintf( "%s %s %s", File::Spec->catfile( 'bin', 'encrypt.pl' ), File::Spec->catfile( 't', $test_file ), File::Spec->catfile( 't', sprintf( '%s.t', $test_file ) ) ) );
should be
system(sprintf( "%s %s %s %s", $^X, File::Spec->catfile( 'bin', 'encrypt.pl' ), File::Spec->catfile( 't', $test_file ), File::Spec->catfile( 't', sprintf( '%s.t', $test_file ) ) ) );
--
Alexandr Ciornii, http://chorny.net