LinuxSir.cn,穿越时空的Linuxsir!

 找回密码
 注册
搜索
热搜: shell linux mysql
查看: 1097|回复: 4

菜鸟求救

[复制链接]
发表于 2004-3-25 17:52:42 | 显示全部楼层 |阅读模式
如何用perl实现先匹配,然后把字符串放到变量中
例如:<td class=a>this is a test
我需要先把<td class=a>匹配出来,然后把字符串"this is a test"放到一个变量中。
发表于 2004-3-25 18:32:42 | 显示全部楼层
#!/usr/bin/perl -w
local $_ = '<td class=a>this is a test';
/<td class=a>/;
$out = $';
print "$out";
发表于 2004-3-25 18:34:01 | 显示全部楼层
那如果test后面还有别的东西呢?比如</td>
发表于 2004-3-25 18:49:13 | 显示全部楼层
#!/usr/bin/perl -w
local $_ = '<td class=a>this is a test</td>';
/<.*>([a-z\s]+)<.*>/ig;
my $out = $1;
print $1;
 楼主| 发表于 2004-3-26 09:19:27 | 显示全部楼层
非常感谢!!!!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表