in reply to a one-liner for this trivial problem?
Something like this perhaps:
$ cat 1028930_short 2 5 6 8
$ cat 1028930_long 1 2 3 4 5 6 7 8 9
$ perl -i -nE 'chomp; if ($s) { $d{$_} or say } else { ++$d{$_}; ++$s +if eof; say }' 1028930_short 1028930_long
$ cat 1028930_short 2 5 6 8
$ cat 1028930_long 1 3 4 7 9
-- Ken
|
|---|