perl-style grep for mac

so skip the while thing
This commit is contained in:
Dirk Wetter
2026-07-10 22:25:49 +02:00
parent 27c432e95d
commit 49c26b7e36
+5 -1
View File
@@ -9,7 +9,10 @@ my $tests = 0;
my $prg="testssl.sh"; my $prg="testssl.sh";
my $os="$^O"; my $os="$^O";
if ( $os eq "darwin" ){
printf "%s\n", "Skipping checks";
exit 0;
}
#1 #1
printf "\n%s\n", "Testing for missing vars at left hand side in double square brackets ..."; printf "\n%s\n", "Testing for missing vars at left hand side in double square brackets ...";
@@ -20,6 +23,7 @@ is(scalar(@matches), 0, "Checking bad '[[ LHS' patterns")
or diag(@matches); or diag(@matches);
$tests++; $tests++;
#2 #2
printf "\n%s\n", "Testing for backticks ..."; printf "\n%s\n", "Testing for backticks ...";