$s=(length $`)+(length $&); substr($slurp,$s) =~ m/post\s*match/;