Posted on 2012-06-21 17:10
Milo的海域 閱讀(312)
評論(0) 編輯 收藏 所屬分類:
Linux 、
Skills
Perl里面的predefined vars
perlvar
$- 當前頁可打印的行數(shù),屬于Perl格式系統(tǒng)的一部分
$! 根據(jù)上下文內(nèi)容返回錯誤號或者錯誤串
$” 列表分隔符
$# 打印數(shù)字時默認的數(shù)字輸出格式
$$ Perl解釋器的進程ID
$% 當前輸出通道的當前頁號
$& 與上個格式匹配的字符串
$( 當前進程的組ID
$) 當前進程的有效組ID
$* 設(shè)置1表示處理多行格式.現(xiàn)在多以/s和/m修飾符取代之.
$, 當前輸出字段分隔符
$. 上次閱讀的文件的當前輸入行號
$/ 當前輸入記錄分隔符,默認情況是新行
$: 字符設(shè)置,此后的字符串將被分開,以填充連續(xù)的字段.
$; 在仿真多維數(shù)組時使用的分隔符.
$? 返回上一個外部命令的狀態(tài)
$@ Perl解釋器從eval語句返回的錯誤消息
$[ 數(shù)組中第一個元素的索引號
$ 當前輸出記錄的分隔符
$] Perl解釋器的子版本號
$^ 當前通道最上面的頁面輸出格式名字
$^A 打印前用于保存格式化數(shù)據(jù)的變量
$^D 調(diào)試標志的值
$^E 在非UNIX環(huán)境中的操作系統(tǒng)擴展錯誤信息
$^F 最大的文件捆述符數(shù)值
$^H 由編譯器激活的語法檢查狀態(tài)
$^I 內(nèi)置控制編輯器的值
$^L 發(fā)送到輸出通道的走紙換頁符
$^M 備用內(nèi)存池的大小
$^O 操作系統(tǒng)名
$^P 指定當前調(diào)試值的內(nèi)部變量
$^R 正則表達式塊的上次求值結(jié)果
$^S 當前解釋器狀態(tài)
$^T 從新世紀開始算起,腳步本以秒計算的開始運行的時間
$^W 警告開關(guān)的當前值
$^X Perl二進制可執(zhí)行代碼的名字
$_ 默認的輸入/輸出和格式匹配空間
$| 控制對當前選擇的輸出文件句柄的緩沖
$~ 當前報告格式的名字
$` 在上個格式匹配信息前的字符串
$’ 在上個格式匹配信息后的字符串
$+ 與上個正則表達式搜索格式匹配的最后一個括號
$< 當前執(zhí)行解釋器的用戶的真實ID
$ 含有與上個匹配正則表達式對應(yīng)括號結(jié)果
$= 當前頁面可打印行的數(shù)目
$> 當前進程的有效用戶ID
$0 包含正在執(zhí)行的腳本的文件名
$ARGV 從默認的文件句柄中讀取時的當前文件名
%ENV 環(huán)境變量列表
%INC 通過do或require包含的文件列表
%SIG 信號列表及其處理方式
@_ 傳給子程序的參數(shù)列表
@ARGV 傳給腳本的命令行參數(shù)列表
@INC 在導入模塊時需要搜索的目錄列表
$-[0]和$+[0] 代表當前匹配的正則表達式在被匹配的字符串中的起始和終止的位置 。用perldoc perlvar 可以結(jié)合實例來了解更詳細的信息。
下面針對$@寫了個perl alarm的例子
#!/usr/bin/perl
my $timeout = 5;
$SIG{ALRM} = sub {
die "alarm\n";
};
eval {
alarm $timeout;
sleep(6);
alarm 0;
};
if ($@) {
print "timeout\n";
}
else {
print "not timeout\n";
}