perl正则表达式（一）

正则表达式(regular expression)是一种由特殊语言写成的程序，内嵌于perl语言之中。在perl语言中，通常也称正则表达式为模式(pattern)。模式就是一个概括性表示字符串的方式。模式中定义了一些特殊含义的符号，应用这些符号的不同组合达到描述一组字符串的目的。字符串是由字符构成的，模式是对字符串的概括性的描述，模式匹配就是从指定字符串中寻找符合指定模式的子串。

#程序功能:在$line中查找是否有子串"hello"
$line="hello world";
if ($flag=$line=~/hello/){
print "Got it!";
}

"$line=~/hello/"表示这是一个普通的模式匹配操作。"=~"符号（模式绑定操作符）表示在$line中寻找匹配模式/hello/的子串，如果发现了符合该模式的子串，该操作符返回1.

模式处在两个模式边界符(/)之间。模式可以是简单的字符串，也可以是采用特殊符号进行的字符串描述。

#程序功能：在$line中查找数字子串
#实现思想：从左到右匹配1个出现的符合模式的最大长度子串
$line="hello 123456 world 789";
if ($line=~/\d+/){
print "$&";
}

默认变量$&是内嵌于perl中的一个简单变量，它存储的是上一次模式匹配成功后与模式相匹配的子串。

注意：正则表达式使用中，若没有结合其他开关项使用则遵循两个默认原则：

（1）从左到右查找第1个出现的匹配模式的子串。

（2）查找匹配模式的最大长度子串。