Re: one liner for for and if

>>>>> "RD" == Rob Dixon <rob.dixon@[EMAIL PROTECTED]
> writes:

  RD> Richard Lee wrote:
  >> 
  >> print "$_\n" for @[EMAIL PROTECTED]
 last if "$_" eq q/three/;

  RD> And you want to write it in one line why?

  RD> print "$_\n" for grep /one/ .. /three/, @[EMAIL PROTECTED]
 the same as his (broken) code. that needs to know 'one' is the first
token in the array. his just is supposed to stop after it hits 'three'.

uri

-- 
Uri Guttman  ------  uri@[EMAIL PROTECTED]
  --------  http://www.sysarch.com
--
-----  Perl Code Review , Architecture, Development, Training, Sup****t
------
--------- Free Perl Training --- http://perlhunter.com/college.html
---------
---------  Gourmet Hot Cocoa Mix  ----  http://bestfriendscocoa.com
---------