正则表达式在包含模式的字符串中查找子字符串

Question

所以如果字符串$ a =“blah bluh bu.du” 我使用以下方法检查字符串是否包含du：

if( $a =~ /\.du+/)

现在它确认字符串中有一个“.du”。我怎样才能得到现在保存到新字符串$ b的单词budu？ 我正在使用perl 抱歉，du应该像文件扩展名

Answer 1

围绕要在括号中捕捉的部分。

if( $a =~ /([a-zA-Z]*?du[a-zA-Z]*?)/){
    if ( defined $1 ) {
        my $word = $1;
        print "$word\n";
    }
}