perl 模式匹配问题

shijiang1130

1^# shijiang1130 发表于 2008-07-08 17:10

$a=qw(abc "123455");$a=~/(".*")/;print $1;我打印出来的结果不想要"";

shijiang1130

2^# shijiang1130 发表于 2008-07-08 17:18

$a=qw(abc "123455");
$a=~/(".*")/;
$b=substr($1,1,-1);
print $b;

churchmice

3^# churchmice 发表于 2008-07-08 17:34

这样不行吗？

[Copy to clipboard] [ - ]

CODE:

$a=~/"(.*)"/;

hdc1112

4^# hdc1112 发表于 2008-07-08 17:39

这样$a=~/"(.*)"/;可以，我刚试了，你的帖子发错了，你最初发的不是这样的