print "a regexp object - ", qr[\b (?: ${\MATCHES} ) \b]x, $/;