$_[0] =~ /^(?:|-|\d+|-\d+)$/ 

##</code><code>##

$_[0] =~ /^(?:|-|\d+|-\d+|\d+\.\d+|-\d+\.\d+)$/