This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
new perldelta
[perl5.git] / t / re / substT.t
1 #!perl -wT
2
3 for $file ('re/subst.t', 't/re/subst.t', ':re:subst.t') {
4   if (-r $file) {
5     do "./$file";
6     exit;
7   }
8 }
9 die "Cannot find re/subst.t or t/re/subst.t\n";