An observation on join

ranga17 has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: An observation on join by moritz (Cardinal) on Sep 21, 2011 at 07:18 UTC
If you were developing the Perl programming language, how would you write a join() function that works with a regex as separator? What would it do? I find that it is often helpful to imagine myself being in a different role, looking at a problem from a different perspective. Perl 6 - second systems done right	[reply]
Re^2: An observation on join by ranga17 (Novice) on Sep 21, 2011 at 07:26 UTC
Hey Thanks! That's much better a way to understand that than having to memorize a rule from perldoc.	[reply]
Re^2: An observation on join by limzz (Novice) on Sep 21, 2011 at 19:25 UTC
Well put! I never bothered thinking about it, but that makes perfect sense. Using a regex for a join would be like saying "get me a food".	[reply]
Re: An observation on join by ranga17 (Novice) on Sep 21, 2011 at 06:07 UTC
Sorry guys. perldoc clearly says " Beware that unlike split, join doesn't take a pattern as its first argument. ". It is evaluating // to 1 and using that as the expr to join.	[reply]
Re: An observation on join by Anonymous Monk on Sep 21, 2011 at 08:42 UTC
Try with this: `perl -e "print join(/ /,qw(a b c))"` [download]	[reply] [d/l]
Re^2: An observation on join by choroba (Cardinal) on Sep 21, 2011 at 08:50 UTC
It breaks if you prepend `$_ = ' ';` [download]	[reply] [d/l]