Re: Split on comma without whitespace after

my $str ="word1,word2, word3,word4,word5";
my @arr = split /,(?=\S)/, $str;
[download]

The code above is a look-ahead; see perlre for more info (look at the chapter on "Look-Around Assertions" there).

Rata

Comment on Re: Split on comma without whitespace after Download Code

Replies are listed 'Best First'.
Re^2: Split on comma without whitespace after by moritz (Cardinal) on Nov 26, 2010 at 16:32 UTC
Or if you want to split in the case of a trailing comma at the end of the input, you can also use a negative look-ahead: `my @ar = split /,(?!\s), $str;` [download] Perl 6 - second systems done right	[reply] [d/l]