Select Code to Download

my %hash
while(<>){
...
   $hash{$key} = 1;
}
#now iterate over the keys of the hash, and either print them out, or 
+do your insert in to the database