[p5sagit/p5-mst-13.2.git] / ext / List / Util / t / p_tainted.t

#!./perl -T

# force perl-only version to be tested
sub List::Util::bootstrap {}

(my $f = __FILE__) =~ s/p_//;
do "./$f";
Commit	Line	Data
cf083cf9	1	#!./perl -T
	2
	3	# force perl-only version to be tested
	4	sub List::Util::bootstrap {}
	5
9850bf21	6	(my $f = __FILE__) =~ s/p_//;
9850bf21	7	do "./$f";