while 多条件判断
时间：2011-03-08
来源：互联网
大侠们.
#!/usr/bin/perl -w
$/=undef;
while (<>){
while ((/\s*?(aa.*?|kkk\s\d:.*?)\r\n(.*?)\r\n/isg)|(/(kkk.*?)\</i)){
print $1,$2,"\n";}
}
如何判断这2个红色 匹配左边的时候显示所在的$1,匹配右边那个的显示所在的$1.谢谢.
#!/usr/bin/perl -w
$/=undef;
while (<>){
while ((/\s*?(aa.*?|kkk\s\d:.*?)\r\n(.*?)\r\n/isg)|(/(kkk.*?)\</i)){
print $1,$2,"\n";}
}
如何判断这2个红色 匹配左边的时候显示所在的$1,匹配右边那个的显示所在的$1.谢谢.
作者: nokia4321 发布时间: 2011-03-08
本帖最后由 jason680 于 2011-03-08 15:39 编辑
用if就可以了.....
或你要做什么....
QUOTE:
大侠们.
#!/usr/bin/perl -w
$/=undef;
while (){
while ((/\s*?(aa.*?|kkk\s\d:. ...
nokia4321 发表于 2011-03-08 15:01
#!/usr/bin/perl -w
$/=undef;
while (){
while ((/\s*?(aa.*?|kkk\s\d:. ...
nokia4321 发表于 2011-03-08 15:01
用if就可以了.....
或你要做什么....
作者: jason680 发布时间: 2011-03-08
用if就过滤出一个.不循环.
作者: nokia4321 发布时间: 2011-03-08
这样也不行吗？
复制代码
- while(<>)
- {
- if(//g){print ."kind one"}
- if(//g){print ."kind two"}
- }
作者: Mr-Summer 发布时间: 2011-03-08
QUOTE:
大侠们.
#!/usr/bin/perl -w
$/=undef;
while (){
while ((/\s*?(aa.*?|kkk\s\d:. ...
nokia4321 发表于 2011-03-08 15:01
#!/usr/bin/perl -w
$/=undef;
while (){
while ((/\s*?(aa.*?|kkk\s\d:. ...
nokia4321 发表于 2011-03-08 15:01
你要的是 || 這個嗎!!??
(是兩個 | , 不是一個)
作者: jason680 发布时间: 2011-03-08
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读：74
-
如何安装mysql8.0
阅读：31
-
Word快速设置标题样式步骤详解
阅读：28
-
20+道必知必会的Vue面试题（附答案解析）
阅读：37
-
HTML如何制作表单
阅读：22
-
百词斩可以改天数吗？当然可以，4个步骤轻松修改天数！
阅读：31
-
ET文件格式和XLS格式文件之间如何转化？
阅读：24
-
react和vue的区别及优缺点是什么
阅读：121
-
支付宝人脸识别如何关闭?
阅读：21
-
腾讯微云怎么修改照片或视频备份路径?
阅读：28
