use VPIT::TestHelpers 'run_perl' => [ 'VTH' ];
-use Test::More tests => 5 + 2;
+use Test::More tests => 5 + 2 + 2;
use Config;
use File::Temp;
is $got, $exp, "run_perl preserving $os ENV vars";
}
+{
+ local $@;
+ my $stat = eval {
+ run_perl_file 't/testcases/run_perl_file.pl';
+ };
+ $stat = $stat >> 8 if defined $stat;
+ is $@, '', 'run_perl_file() does not croak';
+ is $stat, 123, 'run_perl_file() captures the exit value';
+}
+
{
local $@;
eval {