#!./perl
#
# This is a home for regular expression tests that don't fit into
-# the format supported by op/regexp.t. If you want to add a test
-# that does fit that format, add it to op/re_tests, not here.
+# the format supported by re/regexp.t. If you want to add a test
+# that does fit that format, add it to re/re_tests, not here.
use strict;
use warnings;
}
print "1..1\n";
-# there is an equivelent test in t/op/pat.t which does NOT fail
+# there is an equivelent test in t/re/pat.t which does NOT fail
# its not clear why it doesnt fail, so this todo gets its own test
# file until we can work it out.
# linked to the test number.
#
# If you want to add a regular expression test that can't be expressed
-# in this format, don't add it here: put it in op/pat.t instead.
+# in this format, don't add it here: put it in re/pat.t instead.
#
# Note that columns 2,3 and 5 are all enclosed in double quotes and then
# evalled; so something like a\"\x{100}$1 has length 3+length($1).