my ($num)= $seqnum=~/^(\d+)/; my $bigseqnum = $num + 10000000 ...
This naturally only works if the number in $seqnum always conforms to that regex (for example no negative number) and there are no spaces etc. before the number. Otherwise the regex has to be adapted to work in all those cases
The other possibility is to turn of warnings at that point:
no warnings; my $bigseqnum = int($seqnum) + 10000000 ... use warnings;
In reply to Re: Style and warnings
by jethro
in thread Style and warnings
by api
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |