perl -e 'push(@_,$_)while<>;foreach(@_){if(!exists$l{$_}){print;$l{$_}=0}}' <inputfile