perl - 文字列に 9 桁が含まれているかどうかを確認するにはどうすればよいですか?

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 ' のように、前後に空白が続く 9 桁の数字にも一致させたい

\s*文字列の先頭と末尾に指定してみてください

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

PSすべてのケースでの印刷メッセージの意味の違いを観察してください。彼らは同じではありません！