Help for this page

Select Code to Download


  1. or download this
    $ perl -le '
my @arry = qw/ a b cd gefge hhi jjkk l m nn o /;
...
Originals: a b cd gefeg hhi jjk l m nn o
Uniques:   a b cd l m o
$
  2. or download this
    $ perl -le '
my @arry = qw/ a b cd gefge hhi jjkk l m nn o /;
...
Originals: a b cd gefeg hhi jjk l m nn o
Uniques:   a b cd l m o
$
  3. or download this
    $ perl -le '
my $str = shift; 
...
' bar
Original: bar
Unique:   bar