diff options
Diffstat (limited to 't/002goodperl.t')
| -rw-r--r-- | t/002goodperl.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/002goodperl.t b/t/002goodperl.t index f6f14adb5..1cfb6a06f 100644 --- a/t/002goodperl.t +++ b/t/002goodperl.t @@ -48,7 +48,7 @@ foreach my $file (@testitems) { $file =~ m/.*\.(.*)/; my $ext = $1; - if ($file_line1 !~ /\/usr\/bonsaitools\/bin\/perl/) { + if ($file_line1 !~ m#/usr/bin/perl#) { ok(1,"$file does not have a shebang"); } else { my $flags; @@ -71,7 +71,7 @@ foreach my $file (@testitems) { next; } - if ($file_line1 =~ m#/usr/bonsaitools/bin/perl -$flags#) { + if ($file_line1 =~ m#/usr/bin/perl -$flags#) { ok(1,"$file uses -$flags"); } else { ok(0,"$file is MISSING -$flags --WARNING"); |