print "'\001' match\n" if "'\001'" =~ /(')[\1]\1/; print "''' not match\n" unless "'''" =~ /(')[\1]\1/;