print $edits[0][0], "\n"; print $edits[1][0], "\n"; # etc #### print join('|', map $_->[0], @edits), "\n"; #### my @edits = map $_->[0], @{ $timestamps{$page} } ; print Dumper @edits; print join('|', @edits), "\n";