Perl編程語言有許多值得我們學習的地方，你對Perl中的特殊符號了解多少呢？在這里，附上這篇Perl中的特殊符號解析，希望能夠更好的幫助Perl同學更好的學習。

$_??

俗稱perl的老地方，當你的程序中未告知使用哪個參數或者變量時，perl就會自動使用$_中的值，比如

for(1..10){  print ;}

這里print沒有指定參數，所以它就會使用$_，那$_里面是什么呢？每次循環$_的值都會變化，所以$_實際上就是1 .. 10這10個值，所以上面的代碼打印的結果就是12345678910

$!

當且僅當某個函數調用失敗時才會設置該變量，所以經常這樣使用這個變量

open FILE,"

$/

這是perl中的行分隔符，默認是換行符，可以改變這個變量以便一次讀入整個文件，如下

sub test{  open FILE," ;  print$slurp,"/n" ;  $/=$olds ;}

$`

正則表達式匹配變量，代表匹配位置之前的內容

$&??

正則表達式匹配變量，代表匹配的內容

$'?

正則表達式匹配變量，代表匹配位置之后的內容

來看一個例子，解析xml文件，有如下xml文件，我想獲得Code節點的值

<?xml version='1.0' encoding='UTF-8'?>
200
用下面的perl代碼來解析

my$str="200" ;if($str=~/(?<=)(/d+)(?=<//Code>)/){  print"string before matched: $`","/n" ;  print"matched string: $&","/n" ;  print"string after matched: $'","/n" ;}

運行結果是

string before matched:
matched string: 200
string after matched:

其中$`對應，$&對應200，$'對應

$|

控制對當前選擇的輸出文件句柄的緩沖，例子待添加。

@_

傳給子程序的參數列表，通常一個子程序是這樣獲得傳給它的參數的。

sub add {  my ($num1, $num2) = @_;  return $num1 + $num2;}

如果子程序只有一個參數，也可以用shift來獲取，此時，shift相當于shift @_

sub square {  my $num = shift ; # same as my $num = shift @_  return $num * $num;}

perl常見符號

=> 鍵值對，左鍵右值

-> 引用，相當于java中的 【對象.方法名】中的點號

:: 表示調用類的一個方法

% 散列的標志，定義一個鍵值對類型的

@ 數組的標志

$ 標量的標志

=~ 匹配的標志

!~ 不匹配的標志

$! 根據上下文返回錯誤號或者錯誤串

到這里，Perl中的特殊符號解析就介紹完了，如果有什么不清楚可以留言給我，如果覺得我寫得不錯的話，請給武林技術頻道一個關注，謝謝!