- or download this
my @digits = split //, abs;
with:
my @digits = split //, $_;
- or download this
C:\_32\pscrpt>perl try.pl
Argument "-" isn't numeric in addition (+) at try.pl line 10.
Argument "-" isn't numeric in addition (+) at try.pl line 10.
Argument "-" isn't numeric in addition (+) at try.pl line 10.
-221 -21 1 1 3 5 21 34 89 144
- or download this
no warnings 'numeric';
- or download this
sub oddDigitSum {
no warnings 'numeric';
...
}
return @ans;
}