i never read the error message you're reporting. but if it really occours, try to avoid it with a small regex:

my $isnum = 1 if ($param =~ /^\d+$/);
[download]

another way might work with sprintf().
however, perl doesn't care for the difference between strings an numbers, as long as you don't try execute inappropriate operations on them.