Help for this page

Select Code to Download

Select or download this

my %seen;
for (0..$#name1) {
    next if $seen{ $name1[$_] }++;
    print $name2[$_];
}

Select or download this
```
( 0 => 1, ..., $#name1 => 1 )
```