>perl -e"print ref qr//"
Regexp