*nixprompt$ perl -le ' my %seen = (); my @ayin = $ARGV[0]? @ARGV : (); chomp @ayin; print join "\n", grep { !$seen{$_}++ } @ayin;'