在Perl 5中将除一个字符之前的所有字符匹配到特定字符串
增值税
我想以此匹配任何文本块
<eu:img
其次是
>
其次是
"<bean:message key="
其次是什么
>
例如，我希望此文本从eu：img匹配到message key =“
<eu:img src="static/image/icons/erase12.png"
title="<bean:message key="attachedFile.delete.tooltip"/>"></eu:img>
但不是这个文本：
<eu:img src="static/image/icons/erase12.png" title="someTitle"></eu:img>
<link title="<bean:message key="attachedFile.delete.tooltip"/>"></link>
这是我尝试的：
(?s)^<eu:img((?!.*?>).*.{1}?(\=\"<bean:message key\=\"))
fugu
尝试这个：
/(<eu:img[^>]+<bean:message key=)/gs
OP的编辑：好的答案，但我使用的Regex引擎的语法不正确：Eclipse（我认为是Perl 5）。无论如何，这工作正常：
(?s)<eu:img[^>]+="<bean:message key="
<eu:img<eu:img从字面上匹配字符（区分大小写）[^>]+匹配列表中不存在的单个字符（>）量词：在1次到无限制的次数之间，尽可能多的次数，并根据需要返回[贪婪]<bean:message key=<bean:message key=从字面上匹配字符（区分大小写）
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
Perl 从字符串中删除一个字符，除非它是重复的
- 2
在Perl中，如何将一个字符串与其他字符串列表进行匹配？
- 3
perl字符串与另一个字符串完全匹配
- 4
在Perl中，是否有运算符可以大致检查一个字符串是否包含另一个字符串？
- 5
perl在“，”上分割了一个字符串
- 6
Perl：创建一个字符串而不复制
- 7
Perl解析一个字符串并替换多个符号
- 8
Perl：我们如何检查哪个字符串是另一个字符串的子字符串？
- 9
perl 或 sed 命令查找 2 个字符串并将第一个字符串替换为字符串 2
- 10
Perl：如何在一个字符串中找到匹配项并在另一个字符串中进行替换？
- 11
Perl模块，通过将文本插入另一个字符串来检查是否创建了一个字符串
- 12
Perl：在列表中搜索一个字符串，然后在其下方/之后搜索另一个字符串
- 13
Perl正则表达式-匹配上一个字符
- 14
在Perl中，最好的方法是每N个字符插入一个字符
- 15
在Perl中，最好的方法是每N个字符插入一个字符
- 16
Perl Regex 在不同的迭代中用不同的值替换一个字符的所有实例
- 17
Perl：foreach字符串数组，拆分字符串，将每个字符串设置为一个新数组
- 18
Perl：foreach字符串数组，拆分字符串，将每个字符串设置为一个新数组
- 19
Perl 代码，用于在句子中查找数组元素，然后在匹配的任一侧查找要从不同数组匹配的另一个字符串
- 20
Perl在循环中的两个字符串匹配的第一个实例
- 21
Perl在同一行上匹配多个字符串（双引号和单引号内的所有字符）
- 22
在perl中循环遍历文件，并删除少于4个字符的字符串
- 23
Perl：如何匹配字符串中的特定字符？
- 24
将多个子字符串匹配到一个字符串
- 25
匹配两个字符串，与perl中的空格无关
- 26
一个grep的perl表达式，直到出现一个字符组合
- 27
将字符串中的所有字符移动到另一个字符
- 28
Perl：将数组元素复制到单个字符串中
- 29
将perl文件中的前两个字符提取到另一个文件中
我来说两句