Select Code to Download

my %whole_file;
while (<ADDS>)
...
# to see what data structure I just built, dump it via your favourite 
+dumper.  Mine is:
use Data::Dumper;
print Dumper(\@dupes);