in reply to Re: removing duplicates lines plus strings from a file
in thread removing duplicates lines plus strings from a file

I tried doing the following ---
my($url,$name,$text,@lines,$key,$value,$line); my($Docs) = "temp.txt"; #temp.txt is of the format --- #name1@url1@text1 #name1@url1@text1 #name1@url1@text11 #name2@url2@text2 #name2@url2@text21 #name3#url3@text3,etc... my %file_hash; open (FILE, $Docs); @lines = <FILE>; close FILE; foreach $line (@lines) { chomp($line); ($name,$url,$text) = split('@',$line); chomp($url); $key = $url; $value = $line; $file_hash{$key} = $value; } open (OUT, ">$Docs"); for my $key (keys %file_hash) { print OUT "$file_hash{$key}\n"; } close OUT; }

my guess to what is happening here is that since I am using the hash - i am actually storing the last match to the $key and I am not getting what I want as the OUT file
the OUT file that I need is ---
#name1@url1@text1
#name2@url2@text2
#name3#url3@text3,etc...
thank you all for your patience........