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);
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);
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.