if ($num =~ /1-9/)

##</code><code>##

if ($num =~ /^[1-9]+$/)

##</code><code>##

if ($num >= $minimum and $num <= $maximum and int($num) == $num) { ... }