$ perl -e '
    use Data::Dumper;
    use Data::Dump;
    my $x = { a => 1, b => [1,2,3] };
    print "*** From Data::Dumper ***\n";
    print Dumper $x;
    print "*** From Data::Dump ***\n";
    dd $x;
'
*** From Data::Dumper ***
$VAR1 = {
          'b' => [
                   1,
                   2,
                   3
                 ],
          'a' => 1
        };
*** From Data::Dump ***
{ a => 1, b => [1, 2, 3] }