perl - 如何查找我的字符串是否包含九位数字？

Question

如何查找字符串是否包含 9 位数字？这是我试过的可乐。

if($string ~= m/\d{9}/){
    print ("String contains 9 digits");
}

谢谢。

Answer 1

尝试更改~=为=~

if($string =~ m/\d{9}/){
    print ("String contains 9 digits");
}

这将匹配包含至少9 个点的任何字符串

---

如何确保字符串仅包含 9 位数字？

尝试将匹配包含在^and$

if($string =~ m/^\d{9}$/){
    print ("String only contains 9 digits");
}

---

我还想匹配前面或后面跟着空格的九位数字，例如“123456798”

尝试\s*在字符串的开头和结尾指定

if($string =~ m/^\s*\d{9}\s*$/){
    print ("String contains only 9 digits with optional leading or trailing spaces");
}

PS观察所有情况下打印信息含义的差异。他们不一样！