Once you bless a Regexp into another class it isn't a Regexp anymore...

Nope. The magic doesn't go away. As you can see.

sub t {
    printf "%10s %s /%s/\n",
         $_[0],
         ($_[0]=~/$_[1]/ ? "=~" : "!="),
         $_[1];
};

$bqr=bless qr/^blessed$/,"Foo";
$qr=qr/^normal$/;

foreach $rex ($bqr,$qr) {
    t($_,$rex)
        foreach qw(normal blessed);
}

__END__
    normal != /Foo=SCALAR(0x1abf1d8)/
   blessed =~ /Foo=SCALAR(0x1abf1d8)/
    normal =~ /(?-xism:^normal$)/
   blessed != /(?-xism:^normal$)/
[download]

In fact i think its considered a feature. The possibilities are kinda interesting. :-)

--- demerphq
my friends call me, usually because I'm late....