X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2Fsample-tests%2Fshbang_misparse;h=ab93b468aedfd897831fc3843397274ee48c06d5;hb=b965d173aab5196552f8fc4ba42e0913bbdb8d25;hp=bc1b524a3473655c11b30c088db3c067b3e67dde;hpb=794f4697121b50d7447d6309d7c9ada4bca913e2;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/lib/sample-tests/shbang_misparse b/t/lib/sample-tests/shbang_misparse
index bc1b524..ab93b46 100644
--- a/t/lib/sample-tests/shbang_misparse
+++ b/t/lib/sample-tests/shbang_misparse
@@ -8,5 +8,5 @@ print "1..2\n";
 print "ok 1\n";
 my $warning = '';
 $SIG{__WARN__} = sub { $warning .= $_[0] };
-eval("#" . substr($0, 0, 0));
+eval( "#" . substr( $0, 0, 0 ) );
 print $warning ? "not ok 2\n" : "ok 2\n";