Help for this page

Select Code to Download


  1. or download this
    $referrers[$cnt] = [ $element, $name, $count ];
$cnt++;
  2. or download this
    push @referrers, [ $element, $name, $count ];
  3. or download this
    my @sorted_referrers = sort { $a->[2] cmp $b->[2] } @referrers;
  4. or download this
    my @sorted_referrers = sort { (split("|", $a))[2] cmp (split("|",$b))[2] } @referrers;
  5. or download this
    my @sorted_referrers =
    map { $_->[1] }
    sort { $a->[0] cmp $b->[0] },
    map { [ (split("|"))[2], $_ ] } @referrers;