while (<DATA>)
{
    s/\\n/\n/g;
    print "yep\n"  if /$PRE($VALID1+)$PST/;
}