I'm inclined to preprocess the data structure that you pass to Data::Dumper. If you need to use the data again afterward, start by making a copy of everything (see deep copy of nested data structure). After that, use something like Data::Visitor::Callback to roam through it and clobber everything you want not to show up.

The following stringifies every DateTime object.

use Data::Dumper;
use DateTime;
use Data::Visitor::Callback;

my $glob = { dt => DateTime->now(),
             h  => { a => 1, b => 2, dtx => DateTime->now() }, };
my $v = Data::Visitor::Callback->new(
    'DateTime' => sub { $_ = "$_" },
    'ignore_return_values' => 1,
    );
$v->visit( $glob );

print Dumper $glob;
__END__
$VAR1 = { 
          'h' => { 
                   'dtx' => '2008-12-02T17:56:41',
                   'a' => 1,
                   'b' => 2
                 },
          'dt' => '2008-12-02T17:56:41'
        };
[download]