use Data::Dump 'pp';
my $age = 25;
pp $age;
pp { foo => "bar" };
__END__
25
{ foo => "bar" }