Help for this page

Select Code to Download

Select or download this

use strict;

...
  my ($target, @array) = @_;
  grep {$array[$_] eq $target} (0 .. @array - 1)
}

Select or download this
```
2,4
```