[PerlChina] how test a string is number?

[黄叶]

HI, all
I use the Getopt::Std gather the args from command line.

example:
#!/usr/bin/perl -w
use strcit;
use Getopt::Std;
my %opts = ();
getopt("d", \%opts);

print $opts{"d"}

Ok, Now I need a number value about the args named "d", but
How i test the char is number?

Thanks.
-------------- next part --------------
q?????!???,r??m??m???????j+??j)r?j??j?r????9?x????!???