Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
my @topThree = splice @inOrder, 0, 3;

print "$_: $urls{$_}\n" for @topThree;
  2. or download this
    0.999: www.perlmonks.org
0.65: www.snakewranglers.org
0.451: www.jewelmerchants.org