in reply to Re: Divide a list of string into substrings
in thread Divide a list of string into substrings
> Otherwise what is the solution???
My program (changing the tolerance to int rand 5) says
Score 27 $VAR1 = [ [ '333', 'X111' ], [ '222', 'X111' ], [ '000', 'X333' ], [ '000', 'X111' ] ];
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
In Section
Seekers of Perl Wisdom