$scalar =~ /^[1-5]+$/

##</code><code>##

$scalar !~ /[^1-5]/