SPUG: Where is grep's return value?

[Jeremy Mates]

* Orr, Chuck  (NOC) <chuck.orr at attws.com> [2002-09-10T16:08-0700]:
> if (grep("$KEY",EXISTING)){

perl -le '@a=qw(a b c); if (@r = grep { $_ eq "b" } @a) { print "@r" }'

-- 
Jeremy Mates                                        http://www.sial.org/

OpenPGP: 0x11C3D628  (4357 1D47 FF78 24BB 0FBF 7AA8 A846 9F86 11C3 D628)

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     POST TO: spug-list at pm.org       PROBLEMS: owner-spug-list at pm.org
      Subscriptions; Email to majordomo at pm.org:  ACTION  LIST  EMAIL
  Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address
 For daily traffic, use spug-list for LIST ;  for weekly, spug-list-digest
     Seattle Perl Users Group (SPUG) Home Page: http://seattleperl.org