遍历perl中匹配变量的方法
2008-10-10 15:14
197 查看
my $var = "1 1 1 1";
if($var =~/^(/d+)/s+(/d+)/s+(/d+)/s+(/d+)/s*/)
{
for($i = 1;$i<=4;$i++)
{
no strict 'refs';
print "$$i/n";
}
use strict 'refs'; #保险起见，用完记得关上。
}
or
if(@list = $var =~/^(/d+)/s+(/d+)/s+(/d+)/s+(/d+)/s*/)
{
print "@list";
}
对于strict的用法，参见perldoc strict
if($var =~/^(/d+)/s+(/d+)/s+(/d+)/s+(/d+)/s*/)
{
for($i = 1;$i<=4;$i++)
{
no strict 'refs';
print "$$i/n";
}
use strict 'refs'; #保险起见，用完记得关上。
}
or
if(@list = $var =~/^(/d+)/s+(/d+)/s+(/d+)/s+(/d+)/s*/)
{
print "@list";
}
对于strict的用法，参见perldoc strict
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- perl模式匹配中用含特殊字符的变量?(using a variable as a pattern which contains special characters?)
- Shell向Perl脚本中传递变量的方法
- perl正则内置变量匹配
- Perl初级教程 （5） 遍历文件夹内指定扩展名文件，查找匹配关键字的输出。
- Shell向Perl脚本中传递变量的方法
- 选中没有选中的复选框，匹配含有某个字符串的正则，json取值的两种方法，把变量定义在外面跟里面的区别
- 三种遍历文件夹方法比较(PERL)
- .NET框架下向WEB服务器发送请求时的变量集合【代码：遍历方法与变量名/值对】
- shell定义带变量的模板，直接修改变量，用这种方法再也不用担心正则匹配不准的问题了
- Java集合之List遍历找到匹配元素删除方法总结
- JAVA之通过反射遍历JavaBean成员变量和方法
- jQuery 遍历 - siblings() 方法匹配集合中每个元素的同胞
- java正则表达式的匹配结果遍历方法find()和matches()不同
- perl正则的命名捕获与匹配变量使用
- 通过Java对象来遍历成员方法，成员变量，构造函数
- java正则表达式的匹配结果遍历方法find()和matches()不同
- VBS脚本，中间用到了遍历文件夹，正则匹配。使用了 WScript.Shell 对象的几个方法。
- Java集合之List遍历找到匹配元素删除方法总结
- Perl中三种遍历文件夹方法的比较
- Perl初级教程 （5） 遍历文件夹内指定扩展名文件，查找匹配关键字的输出。