[Perldl] function like where, but using indices?

[Diab Jerius]

In today's attempt to write inscrutable one-liners, I'm trying
to turn the following code

   $index = vsearch( $x, $xs );
   @piddles = map { $_->index($idx) } $x, $y;

Into something like this:

   @piddles = whindex( $x, $y, vsearch( $x, $xs ) );

e.g., where(), but with indices instead of a mask.

Does such a function exist?

Thanks!
Diab

_______________________________________________
Perldl mailing list
Perldl@jach.hawaii.edu
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl