foreach my $line(keys %results){

print Dump($post) if $results{$line} == 1;
}
##</code><code>##

my $f1 = "/home/hellena/Desktop/data.txt";
my $f2 = "/home/hellena/Desktop/ini.txt";


my %results = (); 
open FILE1, "$f1" or die "Could not open file: $! \n";

while(my $line = <FILE1>){$results{$line}=1;
}
close(FILE1); 


open FILE2, "$f2" or die "Could not open file: $! \n";
while(my $line =<FILE2>) {  
$results{$line}++;
}
close(FILE2);  

foreach my $line(keys %results){

print Dump($post) if $results{$line} == 1;

}