$foo = 'bar';
print '$foo is a ', ref($foo), $/;
print '\$foo is a ', ref(\$foo), $/;
__DATA__
$foo is a 
\$foo is a SCALAR