Perl - 第十八章 | Perl 特殊變量
Perl 語言中定義了一些特殊的變量,通常以 $, @, 或 % 作為前綴,例如:$_。
很多特殊的變量有一個很長的英文名,操作系統變量 $! 可以寫為 $OS_ERROR
。
如果你想使用英文名的特殊變量需要在程序頭部添加 use English;。這樣就可以使用具有描述性的英文特殊變量。
最常用的特殊變量為 $_,該變量包含了預設輸入和模式匹配內容。範例如下:
1 | #!/usr/bin/perl |
執行以上程序,輸出結果為:
1 |
|
以下範例我們不使用 $_ 來輸出內容:
1 | #!/usr/bin/perl |
執行以上程序,輸出結果為:
1 |
|
範例中,首先輸出 “Google” ,接著輸出 “MoroseDog” ,最後輸出 “GitLab”。
在迭代循環中,當前循環的字符串會放在 $_ 中, 然後 通過 print 輸出。另外 print 在不指定輸出變量,預設情況下使用的也是 $_。
以下是幾處即使沒有寫明 Perl 也會假定使用 $_ 的地方:
- 各種單目函數,包括像 ord() 和 int() 這樣的函數以及除 “-t”以外所有的文件 測試操作 (“-f”,”-d”),”-t” 預設操作 STDIN。
- 各種列表函數,例如 print() 和 unlink()。
- 沒有使用 “=~” 運算符時的模式匹配操作 “m//“、”s///“ 和”tr///“。
- 在沒有給出其他變量時是 “foreach” 循環的預設迭代變量。
- grep() 和 map() 函數的隱含迭代變量。
- 當 “while” 僅有唯一條件,且該條件是對 “”操作的結果進行測試時,$_ 就是存放輸入記錄的預設位置。除了”while” 測試條件之外不會發生這種情況。 (註記:下劃線在特定操作中是可以省略的。)
特殊變量類型
根據特殊的變量的使用性質,可以分為以下幾類:
- 全局標量特殊變量。
- 全局數組特殊變量。
- 全局哈希特殊變量。
- 全局特殊文件句柄。
- 全局特殊常量。
- 正則表達式特殊變量。
- 文件句柄特殊變量。
全局標量特殊變量
以下列出了所有的標量特殊變量,包含了特殊字符與英文形式的變量:
特殊字符/英文形式 | 說明 |
---|---|
$_ $ARG |
預設輸入和模式匹配內容。 |
$. $NR |
前一次讀的文件句柄的當前行號 |
$/ $RS |
輸入記錄分隔符,預設是新行字符。如用undef這個變量,將讀到文件結尾。 |
$, $OFS |
輸出域分隔符 |
$\ $ORS |
輸出記錄分隔符 |
$” $LIST_SEPARATOR |
該變量同 $,類似,但應用於向雙引號引起的字符串(或類似的內插字符串)中內插數組和切片值的場合。預設為一個空格。 |
$; $SUBSCRIPT_SEPARATOR |
在仿真多維數組時使用的分隔符。預設為 “\034”。 |
$^L $FORMAT_FORMFEED |
發送到輸出通道的走紙換頁符。預設為 “\f”. |
$: $FORMAT_LINE_BREAK_CHARACTERS |
當前字符集,在該字符之後字符串可能會被打斷以填充格式中的延續字段(以 ^ 開頭)。預設值為“\n””。 |
$^A $ACCUMULATOR |
打印前用於保存格式化資料的變量 |
$# $OFMT |
打印數字時預設的數字輸出格式(已廢棄)。 |
$? $CHILD_ERROR |
返回上一個外部命令的狀態 |
$! $OS_ERROR or $ERRNO |
這個變量的數字值是errno的值,字符串值是對應的系統錯誤字符串 |
$@ $EVAL_ERROR |
命令eval的錯誤消息.如果為空,則表示上一次eval命令執行成功 |
$$ $PROCESS_ID or $PID |
運行當前Perl腳本程序的進程號 |
$< $REAL_USER_ID or $UID |
當前進程的實際用戶號 |
$> $REAL_GROUP_ID or $GID |
當前進程的有效用戶號 |
$( $REAL_GROUP_ID or $GID |
當前進程的實際組用戶號 |
$) $EFFECTIVE_GROUP_ID or $EGID |
當前進程的有效組用戶號 |
$0 $PROGRAM_NAME |
包含正在執行的腳本的文件名 |
$[ | 數組的數組第一個元素的下標,預設是 0。 |
$] $PERL_VERSION |
Perl的版本號 |
$^D $DEBUGGING |
調試標誌的值 |
$^E $EXTENDED_OS_ERROR |
在非UNIX環境中的操作系統擴展錯誤信息 |
$^F $SYSTEM_FD_MAX |
最大的文件捆述符數值 |
$^H | 由編譯器激活的語法檢查狀態 |
$^I $INPLACE_EDIT |
內置控制編輯器的值 |
$^M | 備用內存池的大小 |
$^O $OSNAME |
操作系統名 |
$^P $PERLDB |
指定當前調試值的內部變量 |
$^T $BASETIME |
從新世紀開始算起,腳步本以秒計算的開始運行的時間 |
$^W $WARNING |
警告開關的當前值 |
$^X $EXECUTABLE_NAME |
Perl二進制可執行程式碼的名字 |
$ARGV | 從預設的文件句柄中讀取時的當前文件名 |
全局數組特殊變量
特殊字符/英文形式 | 說明 |
---|---|
@ARGV | 傳給腳本的命令行參數列表 |
@INC | 在導入模組時需要搜索的目錄列表 |
@F | 命令行的數組輸入 |
全局哈希特殊變量
特殊字符/英文形式 | 說明 |
---|---|
%INC | 散列表%INC包含所有用do或require語句包含的文件.關鍵字是文件名,值是這個文件的路徑 |
%ENV | 包含當前環境變量 |
%SIG | 信號列表及其處理方式 |
全局特殊文件句柄
特殊字符/英文形式 | 說明 |
---|---|
ARGV | 遍歷數組變量@ARGV中的所有文件名的特殊文件句柄 |
STDERR | 標準錯誤輸出句柄 |
STDIN | 標準輸入句柄 |
STDOUT | 標準輸出句柄 |
DATA | 特殊文件句柄引用了在文件中 __END__ 標誌後的任何內容包含腳本內容。或者引用一個包含文件中__DATA__ 標誌後的所有內容,只要你在同一個包有讀取資料,__DATA__ 就存在。 |
_ (下劃線) | 特殊的文件句柄用於緩存文件信息(fstat、stat和lstat)。 |
全局特殊常量
特殊字符/英文形式 | 說明 |
---|---|
__END__ | 腳本的邏輯結束,忽略後面的文本。 |
__FILE__ | 當前文件名 |
__LINE__ | 當前行號 |
__PACKAGE__ | 當前包名,預設的包名是main。 |
正則表達式特殊變量
特殊字符/英文形式 | 說明 |
---|---|
$n | 包含上次模式匹配的第n個子串 |
$& $MATCH |
前一次成功模式匹配的字符串 |
$` $PREMATCH |
前次匹配成功的子串之前的內容 |
$’ $POSTMATCH |
前次匹配成功的子串之後的內容 |
$+ $LAST_PAREN_MATCH |
與上個正則表達式搜索格式匹配的最後一個括號。例如:/Version: (.\*)|Revision: (.*)\/ \&\& ($rev = $+); |
文件句柄特殊變量
特殊字符/英文形式 | 說明 |
---|---|
$| $OUTPUT_AUTOFLUSH |
如果設置為非零,則在當前選定的輸出通道上每次寫入或打印後強制執行 fflush(3)。 |
$% $FORMAT_PAGE_NUMBER |
當前選擇的輸出通道的當前頁碼。 |
$= $FORMAT_LINES_PER_PAGE |
當前所選輸出通道的當前頁面長度(可打印行)。預設值為60。 |
$- $FORMAT_LINES_LEFT |
當前所選輸出通道的頁面上剩餘的行數。 |
$~ $FORMAT_NAME |
當前選定輸出通道的當前報告格式的名稱。 預設是文件句柄的名稱。 |
$^ $FORMAT_TOP_NAME |
當前所選輸出通道的當前頁首格式的名稱。 預設是附加了 _TOP 的文件句柄的名稱。 |