diff --git a/t/12_diff_opensslversions.t b/t/12_diff_opensslversions.t index eb4d668..0e40ed3 100755 --- a/t/12_diff_opensslversions.t +++ b/t/12_diff_opensslversions.t @@ -21,7 +21,7 @@ my $diff=""; my $distro_openssl="/usr/bin/openssl"; my @args=""; # that can be done better but I am a perl n00b ;-) -my $os=`perl -e 'print "$^O";'`; +my $os="$^O"; die "Unable to open $prg" unless -f $prg; die "Unable to open $distro_openssl" unless -f $distro_openssl; diff --git a/t/31_isJSON_valid.t b/t/31_isJSON_valid.t index 9becf16..08c1d02 100755 --- a/t/31_isJSON_valid.t +++ b/t/31_isJSON_valid.t @@ -18,7 +18,7 @@ my $cmd_timeout="--openssl-timeout=10"; my $socket_regex_bl='(e|E)rror|\.\/testssl\.sh: line |(f|F)atal|(c|C)ommand not found'; my $openssl_regex_bl='(e|E)rror|(f|F)atal|\.\/testssl\.sh: line |Oops|s_client connect problem|(c|C)ommand not found'; # that can be done better but I am a perl n00b ;-) -my $os=`perl -e 'print "$^O";'`; +my $os="$^O";' die "Unable to open $prg" unless -f $prg;