[解決済み] 文字列が部分文字列を含むかどうかをチェックする

質問

Perlを使って、与えられた文字列が特定の部分文字列を含んでいるかどうかを調べるにはどうしたらよいでしょうか。

より具体的には、私は s1.domain.com が与えられた文字列変数に存在するかどうかを確認したい。

どのように解決するのですか？

文字列が部分文字列を含んでいるかどうかを調べるには index 関数を使うことができます。

if (index($str, $substr) != -1) {
    print "$str contains $substr\n";
} 

が最初に出現する位置を返します。 $substr の中で $str で、部分文字列が見つからなければ-1。