Help for this page

Select Code to Download


  1. or download this
    sub uinq {
       # local *_;  # <== will fail, $_ will work
    ...
    my @array = (1,1,3,3,2,3,5,7,5,2);
    
    print "@{[ uinq @array ]}\n";