use Data::Dumper;
my $val = 'something';
print Dumper(\$val);