in reply to Missing ref() return possibility?

Did you try perl -e 'print ref(qr/abc/)' ??

In Section Seekers of Perl Wisdom