13 is(ref $rx, "Regexp", "qr// blessed into `Regexp' by default");
16 # DESTROY doesn't do anything in the case of qr// except make sure
17 # that lookups for it don't end up in AUTOLOAD lookups. But make sure
20 ok($rx->can("DESTROY"), "DESTROY method defined for Regexp");