I get the segfault with perl 5.6.1 on solaris. But strangely, if I change the line:

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

to:

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

It works fine. I can't see why that should make any difference.

Update:

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

Update: Tested on Win32, with ActiveState's D::D 2.121 PPM. Same behaviour - using Dumper() in scalar context avoids segfault.