Re: Re: Using map

Possibly a bit more 'intuitive'...

my @sub_locs = grep { $_ } map { /taxman\.add\.subloc\.(.*)/ } @sessio
+n_keys;
[download]

...though YMMV depending on comfort with the language.

-----------------------------------------------------
Dr. Michael K. Neylon - mneylon-pm@masemware.com || "You've left the lens cap of your mind on again, Pinky" - The Brain
It's not what you know, but knowing how to find it if you don't know that's important

Comment on Re: Re: Using map Download Code

Replies are listed 'Best First'.
Re: Re: Re: Using map by merlyn (Sage) on Oct 05, 2001 at 00:56 UTC
`my @sub_locs = grep { $_ } map { /taxman\.add\.subloc\.(.)/ } @sessio +n_keys;` [download] Maybe a "bit more intuitive", but "wrong" if the value after taxman string might be empty or the value "0". Did you mean instead: `my @sub_locs = grep { defined $_ } map { /taxman\.add\.subloc\.(.)/ } + @session_keys;` [download] perhaps? And of course, as I'm seeing this, the grep isn't even necessary, since on a failed match, the match returns an empty list! `my @sub_locs = map { /taxman\.add\.subloc\.(.+)/ } @session_keys;` [download] is enough! -- Randal L. Schwartz, Perl hacker	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: Re: Re: Using map
by merlyn (Sage) on Oct 05, 2001 at 00:56 UTC

 
my @sub_locs = grep { $_ } map { /taxman\.add\.subloc\.(.*)/ } @sessio
+n_keys;
[download]

my @sub_locs = grep { defined $_ } map { /taxman\.add\.subloc\.(.*)/ }
+ @session_keys;
[download]

And of course, as I'm seeing this, the grep isn't even necessary, since on a failed match, the match returns an empty list!

my @sub_locs = map { /taxman\.add\.subloc\.(.+)/ } @session_keys;
[download]

-- Randal L. Schwartz, Perl hacker

[reply]
[d/l]
[select]