$_ = '\x2f\x2f\x2f' . "\n"; print; print "Matched\n" if s/\Q\x2f/\//igs; print; __END__ \x2f\x2f\x2f Matched ///