seeking golfing advice
damien krotkine <[email protected]> Wed, 16 May 2012 13:15:53 +0200
| Newsgroups | gmane.comp.lang.perl.fun |
|---|---|
| Message-ID | <CAM56AsR5kTjJ5p63o0X=jm1Cth=nXhhky+arsWGLdH7jinXSUw@mail.gmail.com> |
Hi,
I'm using this code to get a list of only the odd elements of an
array. The resulting list must have the same order as the array.
map { state $f; ($_) x (++$f%2) } @array;
I'm looking for advice to make it shorter or nicer. Everything in perl
5.12 is allowed, but must pass use strict. I've failed at using the
'..' operator to act as a flip/flop operator...
thanks,
dams