Re^2: Argument "" Isn't numeric in numeric eq (==)

[karlgoethebier]

This looks really cool. But how did you manage it before?

Imho it looks like CSV and the OP needs to do something like my @f = split ',', $data;.

This yields:

$VAR1 = [
          '1',
          '1'
        ];

And after casting it:

$VAR1 = [
          1,
          1
        ];

What do i miss (or perhaps yet another mental block)?

Best regards, Karl

[choroba]

I do not understand the question. I just populated the @f array as in the OP. I just used

while (<DATA>) {
    my @f = (undef, split /,/);

as the @f in the OP is not zero based, but one based. There is no need to cast between strings and numbers in Perl.

[karlgoethebier]

"There is no need to cast..."

Yes s(h)ure. I was a bit confused about this Isn't numeric in numeric eq (==). Sorry, i couldn't explain it better :-(

Best regards, Karl

[choroba]

The empty strings were the reason of the warning. They are handled by the || 0, because emtpy string is false.