There was one additional nit - which perhaps you can pick -the need to say "print Dumper (\$blah)" - why keep repeating the "print" or "warn" .. wouldn't is be nice to have an OO interface that remembers what you want to do.

The latest version of Data::Dumper::Simple supports this.

use Data::Dumper::Simple autowarn => 1;
Dumper($scalar, @array, %hash);
[download]

Or if you'd rather carp and you're already using a sub named Dumper:

use Data::Dumper::Simple as => 'show', autowarn => 'carp';
show($scalar, %hash);
[download]

There's not much of a savings if you're doing this just once, but if you are doing a lot of debugging, it can save quite a bit of time.