perl -ne 'push @a, $_; $h{$_}++; END{print grep {not --$h{$_}} @a}' file #### cabbage apple banana grape pear banana carrot apple apple banana grape pear banana apple #### cabbage carrot grape pear banana apple #### perl -ne 'print unless $h{$_}++' file #### sort -u file sort file | uniq