$ perl -i -nE 'chomp; if ($s) { $d{$_} or say } else { ++$d{$_}; ++$s if eof; say }' 1028930_short 1028930_long