[转 改] Perl初级教程 （四）

【字符串匹配】

  则表达式-regular expression

 　　规则表达式包含在斜线内，匹配通过=~操作符进行。如果字符串the出现在变量$sentence中，则下面的表达式为真：

  　 $sentence =~ /the/

　　RE是大小写敏感的，所以如果

　　$sentence = "The quick brown fox";

　　那么上面的匹配结果为false。

   

$TestStr = "Contains a test !" ;
if ($TestStr = ! ~/test/)
{
    print("Contain ! ");
}
else
{
    print("No contain !");
}
> No contain ！

下面是一些特殊的RE字符和它们的意义：

.	# Any single character except a newline
^	# The beginning of the line or string
$	# The end of the line or string
*	# Zero or more of the last character
+	# One or more of the last character
?	# Zero or one of the last character

 【特殊变量[URL]】

   1. $$

   perl -e "sleep(5);print qq(The PID of process perl.exe is : $$)";  # 命令行运行, $$是当前perl解析器的进程ID（即，PID).

> The PID of process perl.exe is : 1871

   2. $_.

  

@FruitList = ("Apple ","Pear ","Orange ","Peach ");

foreach(@FruitList)
{
print $_."\n";
}

> Apple

  Pear

  Orange

  Peach

 

在程序第五行中：foreach (@array) 实际上就是等于 foreach $_ (@array)，在这里，$_是默认是输入/输出，因此，如果在程序中有类似的没有明确声明的变量位置的时候，就有可能能使用$_代替。