[10:41:17] ~
$ perl -e '$a=5; print ref($a)'

[10:41:29] ~
$