Help for this page
open(LIST, "| sort -n| uniq");
perl -e'open F,"|sort|uniq"; print F "aa\n","bb\n","aa\n","bb\n"; clos +e F'
aa bb