Perl中的特殊符號介紹
$_
俗稱perl的老地方，當(dāng)你的程序中未告知使用哪個參數(shù)或者變量時，perl就會自動使用$_中的值，比如
for(1..10){
print ;
}
這里print沒有指定參數(shù)，所以它就會使用$_，那$_里面是什么呢？每次循環(huán)$_的值都會變化，所以$_實(shí)際上就是1 .. 10這10個值，所以上面的代碼打印的結(jié)果就是12345678910
$!
當(dāng)且僅當(dāng)某個函數(shù)調(diào)用失敗時才會設(shè)置該變量，所以經(jīng)常這樣使用這個變量
open FILE,"<d:/code/zdd.txt" or die $! ;
$/
這是perl中的行分隔符，默認(rèn)是換行符，可以改變這個變量以便一次讀入整個文件，如下
sub test{
open FILE,"<d:/code/zdd.txt" or die $! ;
my$olds= $/ ;
local $/=undef ;
my$slurp=<FILE> ;
print$slurp,"\n" ;
$/=$olds ;
}
$`
正則表達(dá)式匹配變量，代表匹配位置之前的內(nèi)容
$&
正則表達(dá)式匹配變量，代表匹配的內(nèi)容
$'
正則表達(dá)式匹配變量，代表匹配位置之后的內(nèi)容
來看一個例子，解析xml文件，有如下xml文件，我想獲得Code節(jié)點(diǎn)的值
<?xml version='1.0' encoding='UTF-8'?>
<Code>200</Code>
用下面的perl代碼來解析
my$str="<Code>200</Code>" ;
if($str=~/(?<=<Code>)(\d+)(?=<\/Code>)/){
print"string before matched: $`","\n" ;
print"matched string: $&","\n" ;
print"string after matched: $'","\n" ;
}
運(yùn)行結(jié)果是
string before matched: <Code>
matched string: 200
string after matched: </Code>
其中$`對應(yīng)<Code>，$&對應(yīng)200，$'對應(yīng)</Code>
$|
控制對當(dāng)前選擇的輸出文件句柄的緩沖，例子待添加。
@_
傳給子程序的參數(shù)列表，通常一個子程序是這樣獲得傳給它的參數(shù)的。
sub add {
my ($num1, $num2) = @_;
return $num1 + $num2;
}
如果子程序只有一個參數(shù)，也可以用shift來獲取，此時，shift相當(dāng)于shift @_
sub square {
my $num = shift ; # same as my $num = shift @_
return $num * $num;
}
perl常見符號
=> 鍵值對，左鍵右值
-> 引用，相當(dāng)于java中的 【對象.方法名】中的點(diǎn)號
:: 表示調(diào)用類的一個方法
% 散列的標(biāo)志，定義一個鍵值對類型的
@ 數(shù)組的標(biāo)志
$ 標(biāo)量的標(biāo)志
=~ 匹配的標(biāo)志
!~ 不匹配的標(biāo)志
$! 根據(jù)上下文返回錯誤號或者錯誤串
相關(guān)文章
這篇文章主要介紹了Perl初學(xué)筆記之Hello World,本文是自學(xué)Perl的一篇筆記,本文著重講解了cpan的使用,需要的朋友可以參考下2015-06-06
這篇文章主要介紹了Perl List::Util模塊使用實(shí)例,本文給出掃描符合條件的某個列表并取出第一個符合條件的、求1到1000之間的和 、求一組數(shù)字的最大值與最小值等實(shí)用功能代碼,需要的朋友可以參考下2015-06-06
perl比較兩個文件字符串的例子，供大家學(xué)習(xí)參考2013-02-02
正則表達(dá)式是 Perl 語言的一大特色，也是 Perl 程序中的一點(diǎn)難點(diǎn)，不過如果大家能夠很好的掌握他，就可以輕易地用正則表達(dá)式來完成字符串處理的任務(wù)，當(dāng)然在 CGI 程序設(shè)計(jì)中就更能得心應(yīng)手了2013-07-07
強(qiáng)大的Perl正則表達(dá)式實(shí)例詳解
正則表達(dá)式是Perl語言的特色，基本的語法不是很難，但是編寫一個符合需求、高效的正則表達(dá)式，還是有一些挑戰(zhàn)的。下面這篇文章主要給大家介紹了關(guān)于強(qiáng)大的Perl正則表達(dá)式的相關(guān)資料，需要的朋友可以參考借鑒，下面來一起看看吧。2017-11-11
今天小編就為大家分享一篇關(guān)于Perl5和Perl6對比使用Sigils的差別，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-09-09
這篇文章主要介紹了Perl數(shù)組排序?qū)W習(xí)筆記,本文講解了基于ASCII碼排序、按字母順序排列、Perl對數(shù)值排序等內(nèi)容,需要的朋友可以參考下2015-06-06
這篇文章主要介紹了Perl腳本實(shí)現(xiàn)遞歸遍歷目錄下的文件,本文直接給出實(shí)現(xiàn)代碼,代碼中包含明細(xì)注釋,需要的朋友可以參考下2015-04-04
這篇文章主要介紹了Perl實(shí)現(xiàn)遍歷目錄例子,本文示例運(yùn)行在Windows系統(tǒng)下,而且需要gbk編碼,需要的朋友可以參考下2014-12-12
perl的logwrapper可以對任何的函數(shù)將標(biāo)準(zhǔn)輸出和錯誤輸出重定向到對應(yīng)的log文件2013-02-02