if ($selection !~ /[1-$length]/) { ...