我正在为我正在做的网站制作一个登录系统。我使用正则表达式的经验有限，并且由于某种原因它不起作用。有问题的代码是：
if (!(preg_match("/[A-Za-z0-9_ ]+/",$username)&&(strlen($username)>=4) &&
strlen($username)<=25))
{
return 4;
}
长度检查可以正常工作，但字符检查却不能。它应该检查以确保$username仅包含字母、数字 _ 和空格。它似乎只检查第一个字符，之后就一切顺利！
如果有人可以提供帮助，将不胜感激，谢谢！
我试图用Ocaml做一个递归函数,但我一直得到相同的错误代码.
let rec get x =
if x > 7 then
get x-7;;
我得到了非常有用的错误信息:
错误:此表达式的类型为int,但表达式的类型为unit
我是OCaml的初学者,并在大学学习模块.这是我的任务之一,我有点卡住了!
我原本想通过一个while循环来做(因为我是一个占主导地位的程序员),但我无法让它工作,所以我想我会尝试递归!
谢谢