SPUG: Where is grep's return value?
William Julien
moonbeam at catmanor.com
Tue Sep 10 19:10:16 CDT 2002
Or even better...
-->perl -le '@a=qw(vi is my shepherd I shall not font it); print join " ", grep /i/, @a;'
vi is it
William Julien
(vi bill)
>
>On Tue, Sep 10, 2002 at 04:27:08PM -0700, Jeremy Mates wrote:
>> * 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" }'
>
>The "if" and "@r" temporary variable can be removed:
>
>perl -le '@a=qw(a b c); print grep { $_ eq "b" } @a'
>
>
>Asim
>
> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> 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
>
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
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
More information about the spug-list
mailing list