perl 内置变量 $1

perl 内置变量 $1

    2011-8-17 17:52

提问者：gtruanlongbing  |  浏览次数：35次

#! /usr/bin/perl #
 $a="this is a match THIS";
 $a=~/(TH)/;
 print " first $1\n";
 $a=~/(THIS)/;
print "second $1\n";
 $a=~/(THAT)/;
print "third $1\n";

程序运行结果：
first TH
second THIS
thrid THIS

为什么最后一次匹配不到THAT，$1返回的不是空而是上次匹配成功的？

其他回答  共4条

  2011-8-18 00:37热心网友

1: 匹配不成功 ,$1返回的是上次匹配成功的结果.
2: $a="this is a match THIS"，没有 ；THAT，所以最后一次匹配不到THAT， 

0

|  评论

  2011-8-20 15:12 last_phantom  | 三级

楼上说对了 $1不会自动清除 只是保留上次的值 

0

|  评论

检举 | 2011-8-22 15:19 fengyongchuang  | 四级

要注意你的 （） 通常 $1 是反回匹配结果第一对 括号的内容。$1是系统变量，用来保存匹配结果的。。 

0

|  评论

  2011-8-24 15:16 ace_fei  | 六级

$1只会保留最近一次匹配的结果，无论是不是空值