xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/regexp_noamp.t (revision 0:68f95e015346)
1#!./perl
2
3$skip_amp = 1;
4for $file ('./op/regexp.t', './t/op/regexp.t', ':op:regexp.t') {
5  if (-r $file) {
6    do $file;
7    exit;
8  }
9}
10die "Cannot find ./op/regexp.t or ./t/op/regexp.t\n";
11