Help for this page

Select Code to Download


  1. or download this
    perl -pale '$_="@{[grep !$s{$_}++, @F]}"'
    
  2. or download this
    my %seen;
    print join(' ', grep !$seen{$_}++, split), "\n" while <STDIN>;