while (<>) {
    chomp;
    $no_dupes{$_} = $. if (! exists $no_dupes{$_});
}