Help for this page

Select Code to Download

Select or download this

if($input =~ /^(-?)((0|\d+).)?\d+$/)
{
   print ("Yes, it is a number\n");
}

Select or download this
```
if($input =~ /^(-?)(\d+.)?\d+$/)
```