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