$ perl -e 'use Data::Dumper; my $x = "foo"; my $x_ref = \$x; print Dumper ref($x), ref($x_ref);'
$VAR1 = '';
$VAR2 = 'SCALAR';