Re: Surprised by join

I don't know what your rules are to have a ':' or a '' but what about a nice map statement?

$result = join /""/, (map {$_, $_ ? '' : ':'} @list);
[download]

pelagic

Comment on Re: Surprised by join Download Code

Replies are listed 'Best First'.
Re^2: Surprised by join by EdwardG (Vicar) on Jun 08, 2004 at 13:43 UTC
Yes indeed, `map` also does the trick, I'm just surprised that `join` doesn't, not without help anyway.	[reply] [d/l] [select]
Re^3: Surprised by join by pelagic (Priest) on Jun 08, 2004 at 13:54 UTC
join does not set $_ to each element obviously. And why is that so? Ask Larry! pelagic	[reply]
Re^4: Surprised by join by EdwardG (Vicar) on Jun 08, 2004 at 13:58 UTC
I will ask next time I meet him :) As I speculated above, it might not make sense to set `$_` to each element since each step of the join must work on a pair of elements.	[reply] [d/l]
Re^5: Surprised by join by pelagic (Priest) on Jun 08, 2004 at 14:01 UTC
Re^5: Surprised by join by dragonchild (Archbishop) on Jun 08, 2004 at 15:16 UTC