perl -wE 'my @a = (0,2,3); map say, @a if $a[1]' [download]
In reply to Re: why not listed foreach and if? by Danny in thread why not listed foreach and if? by vincentaxhe