Help for this page

Select Code to Download


  1. or download this
    !$history{$_}++ && splice(@history, $i--, 1);
  2. or download this
    my %seen;
@history = reverse grep { !$seen{$_}++ } reverse @history;