use Data::Dumper; my $var = {A => 1}; print Dumper $var;