$user_pass = $INPUT->param{'pass'}; if ($user_pass =~ /^[A-Za-z0-9]+$/ && length($user_pass) < 17) { $user_pass = $1; }