Help for this page
my @nums = $x =~ /(\S+)/g;
my @nums = split(' ', $x);
# @nums = ('1', '11', '2', '22', '222', '3', '33'); my @nums = $x =~ /(\d+)/g;
# @nums = (['1', '11'], ['2', '22', '222'], ['3', '33']); my @nums = map { [ /(\d+)/g ] } $x =~ /(\S+)/g;
# @nums = ('2', '22', '222'); my @nums = ($x =~ /\s(\S+)/)[0] =~ /(\d+)/g;
# @nums = ('2', '22', '222'); my @nums = (split(' ', $x, 3))[1] =~ /(\d+)/g;
www.com | www.net | www.org
There is too much technical debt in my codebase The stability of the system Perl suits me better I have to support users of some ancient version I'm stuck with ActiveState/TinyPerl/microperl/Strawberry ... Letting the early adopters trip over the bugs is fine Some other reason
Results (38 votes). Check out past polls.
