$ perl -Mv5.014 -e' sub f { say ref( \$_[0] ); } f substr( "", 0, 0 ); ' LVALUE