Bless expects a reference, and a "regex object" is just a string.

Errr... not so. Witness:

$ perl -le 'print ref qr/foo/'
Regexp
[download]

-sauoq
"My two cents aren't worth a dime.";