if ($num && $num =~ /^[0-9]+$/) {say 1/$num}