print $uniq{$file}[0], "\n";
print $uniq{$file}[1], "\n";