print "Matched!" if $myvar =~ /(?{$myob->escaped})/;