perl -ne ... | sort | uniq #### perl -ne ... | sort -u #### perl -ne 's/\W+/ /g; for $w (split){$u{$w}++} END{print join $/,sort keys %u,""}'
## perl -ne ... | sort -u ##
## perl -ne 's/\W+/ /g; for $w (split){$u{$w}++} END{print join $/,sort keys %u,""}'