Help for this page

Select Code to Download

Select or download this

my %id = (bananas => 456,
          oranges =>  23,
          peaches => 897236,
...
for my $i (0 .. $#replaces) {
    $replaces[$i] = $id{$replaces[$i]};
}