print "Dumper:\n",Dumper(\%rev,\%name),"\n";

##</code><code>##

    my $dumped = Dumper(\%rev,\%name);
    print "Dumper:\n",$dumped,"\n";

##</code><code>##

simonf$ perl -MData::Dumper -le 'print Data::Dumper->VERSION'
2.12_01