[p5sagit/p5-mst-13.2.git] / ext / Test / Harness / t / sample-tests / inc_taint

#!/usr/bin/perl -Tw

use Test::More tests => 1;

ok( grep( /examples/, @INC ) );
Commit	Line	Data
e4fc8a1e	1	#!/usr/bin/perl -Tw
e4fc8a1e	2
e4fc8a1e	3	use Test::More tests => 1;
e4fc8a1e	4
b965d173	5	ok( grep( /examples/, @INC ) );
e4fc8a1e	6