The stupid question is the question not asked | |
PerlMonks |
Re: Argument "" Isn't numeric in numeric eq (==)by Bloodnok (Vicar) |
on Feb 10, 2014 at 15:15 UTC ( [id://1074258]=note: print w/replies, xml ) | Need Help?? |
Why not iterate over the data set, a line at a time, using a regex to capture all required occurrences...
$ perl -e 'my $t = "1,2,3,4,1,1,1,3,5,1,1,1,1"; my @s = $t =~ /(1,1),?/g; my @f = $t =~ /(1,2),?/g; die sprintf "%d success(es), %d failure(s)", scalar @s, scalar @f' returns 3 success(es), 1 failure(s) at -e line 1 ... as expected - with no warnings :-)
A user level that continues to overstate my experience :-))
In Section
Seekers of Perl Wisdom
|
|