Perl中的正则表达式

dy

我的作业是“查找至少包含3个零和最多2个1的字符串的数目”,而我的字母仅包含0和1。我尝试这样写:

(if $line =~ /0{3,}/)

但是它只给了我3个“连续”零。

比我尝试过的:

(if $line =~ /0+0+0+/) 

再次给了我连续的零。

检查all字符串并查找该字符串中的所有零的数目(无论它们是顺序的还是不连续的)的逻辑是什么。

FtLie
#match a 0 + anything + 0 + anything + 0, and not (!) 1...1...1
if (($line =~ /0.*0.*0/) && !($line =~ /1.*1.*1/) ) {
    $count++;
}

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

Perl中的正则表达式

来自分类Dev

Perl中的正则表达式

来自分类Dev

Perl / Curl脚本中的Perl正则表达式

来自分类Dev

Perl中的计算正则表达式替换

来自分类Dev

Perl在正则表达式中的花括号

来自分类Dev

在Perl中编译动态正则表达式

来自分类Dev

正则表达式中的perl意外令牌?

来自分类Dev

在Perl中解释正则表达式

来自分类Dev

Stringr包中的Perl正则表达式

来自分类Dev

Perl正则表达式中的反向引用

来自分类Dev

正则表达式在Perl中不匹配

来自分类Dev

正则表达式中的Perl变量消除歧义

来自分类Dev

Perl脚本中的正则表达式

来自分类Dev

正则表达式替换中的Perl尖括号

来自分类Dev

Perl中替换正则表达式的意外结果

来自分类Dev

Perl与终端中的正则表达式匹配?

来自分类Dev

在Perl中取反正则表达式

来自分类Dev

在Perl中解码正则表达式

来自分类Dev

Perl中的计算正则表达式替换

来自分类Dev

Perl在正则表达式中的花括号

来自分类Dev

Python中的Perl正则表达式

来自分类Dev

Perl正则表达式中的〜m,s和()

来自分类Dev

Perl正则表达式中的反斜杠

来自分类Dev

在Perl中匹配正则表达式的问题

来自分类Dev

正则表达式Perl中的特殊行匹配

来自分类Dev

在Perl中编译动态正则表达式

来自分类Dev

Perl正则表达式中的替换命令?

来自分类Dev

正则表达式中的perl意外令牌?

来自分类Dev

正则表达式在Perl中不匹配