1#!./perl -w 2 3use strict; 4BEGIN { 5 if ($] < 5.005) { 6 print "1..0\n"; 7 print "ok 1 # skipped; this test requires at least perl 5.005\n"; 8 exit; 9 } 10} 11use Test; plan tests => 1; 12 13ok 'abc', qr/b/; 14