if (/^-?\d+\.?\d*$/) { print "is a real number\n" }

##</code><code>##

warn "not a decimal number" unless (/^-?\d+\.?\d*$/); #rejects .2