Help for this page

Select Code to Download


  1. or download this
    my @a1 = @{$hash{key1}};
my @a2 = @{$hash{key2}};
  2. or download this
    my $a1 = $hash{key1};
my $a2 = $hash{key2};
...
    if ($a1->[$i] eq $a2->[$i]) {
  3. or download this
        if ($hash{key1}->[$i] eq $hash{key2}->[$i]) {