Perl 特殊變數
Perl 語言中定義了一些特殊的變數，通常以 $, @, 或 % 作為首碼，例如：$_。
很多特殊的變數有一個很長的英文名，操作系統變數 $! 可以寫為 $OS_ERROR。
如果你想使用英文名的特殊變數需要在程式頭部添加 use English;。這樣就可以使用具有描述性的英文特殊變數。
最常用的特殊變數為 $_，該變數包含了默認輸入和模式匹配內容。實例如下：
實例
執行以上程式，輸出結果為：
Google zaixian Taobao
以下實例我們不使用 $_ 來輸出內容：
實例
執行以上程式，輸出結果為：
Google zaixian Taobao
實例中，首先輸出 "Google" ，接著輸出 "zaixian" ，最後輸出 "Taobao" 。
在迭代迴圈中，當前迴圈的字串會放在 $_ 中, 然後 通過 print 輸出。另外 print 在不指定輸出變數，默認情況下使用的也是 $_。
以下是幾處即使沒有寫明 Perl 也會假定使用 $_ 的地方：
- 各種單目函數，包括像 ord() 和 int() 這樣的函數以及除 "-t"以外所有的檔 測試操作 ("-f"，"-d")，"-t" 默認操作 STDIN。
- 各種列表函數，例如 print() 和 unlink()。
- 沒有使用 "=~" 運算符時的模式匹配操作 "m//"、"s///" 和"tr///"。
- 在沒有給出其他變數時是 "foreach" 迴圈的默認迭代變數。
- grep() 和 map() 函數的隱含迭代變數。
- 當 "while" 僅有唯一條件，且該條件是對 ""操作的結果進行測試時，$_ 就是存放輸入記錄的默認位置。除了"while" 測試條件之外不會發生這種情況。(助記：下劃線在特定操作中是可以省略的。)
特殊變數類型
根據特殊的變數的使用性質，可以分為以下幾類：
全局標量特殊變數。
全局數組特殊變數。
全局哈希特殊變數。
全局特殊檔句柄。
全局特殊常量。
正則運算式特殊變數。
檔句柄特殊變數。
全局標量特殊變數
以下列出了所有的標量特殊變數，包含了特殊字元與英文形式的變數：
| $_ | 默認輸入和模式匹配內容。 |
| $ARG | |
| $. | 前一次讀的檔句柄的當前行號 |
| $NR | |
| $/ | 輸入記錄分隔符號,默認是新行字元。如用undef這個變數,將讀到檔結尾。 |
| $RS | |
| $, | 輸出域分隔符號 |
| $OFS | |
| $\ | 輸出記錄分隔符號 |
| $ORS | |
| $" | 該變數同 $,類似，但應用於向雙引號引起的字串(或類似的內插字串)中內插數組和切片值的場合。默認為一個空格。 |
| $LIST_SEPARATOR | |
| $; | 在仿真多維數組時使用的分隔符號。默認為 "\034"。 |
| $SUBSCRIPT_SEPARATOR | |
| $^L | 發送到輸出通道的走紙換頁符。默認為 "\f". |
| $FORMAT_FORMFEED | |
| $: | The current set of characters after which a string may be broken to fill continuation fields (starting with ^) in a format. Default is "\n"". |
| $FORMAT_LINE_BREAK_CHARACTERS | |
| $^A | 列印前用於保存格式化數據的變數 |
| $ACCUMULATOR | |
| $# | 列印數字時默認的數字輸出格式（已廢棄）。 |
| $OFMT | |
| $? | 返回上一個外部命令的狀態 |
| $CHILD_ERROR | |
| $! | 這個變數的數字值是errno的值,字串值是對應的系統錯誤字串 |
| $OS_ERROR or $ERRNO | |
| $@ | 命令eval的錯誤消息.如果為空,則表示上一次eval命令執行成功 |
| $EVAL_ERROR | |
| $$ | 運行當前Perl腳本程式的進程號 |
| $PROCESS_ID or $PID | |
| $< | 當前進程的實際用戶號 |
| $REAL_USER_ID or $UID | |
| $> | 當前進程的有效用戶號 |
| $EFFECTIVE_USER_ID or $EUID | |
| $( | 當前進程的實際組用戶號 |
| $REAL_GROUP_ID or $GID | |
| $) | 當前進程的有效組用戶號 |
| $EFFECTIVE_GROUP_ID or $EGID | |
| $0 | 包含正在執行的腳本的檔案名 |
| $PROGRAM_NAME | |
| $[ | 數組的數組第一個元素的下標,默認是 0。 |
| $] | Perl的版本號 |
| $PERL_VERSION | |
| $^D | 調試標誌的值 |
| $DEBUGGING | |
| $^E | 在非UNIX環境中的操作系統擴展錯誤資訊 |
| $EXTENDED_OS_ERROR | |
| $^F | 最大的檔捆述符數值 |
| $SYSTEM_FD_MAX | |
| $^H | 由編譯器啟動的語法檢查狀態 |
| $^I | 內置控制編輯器的值 |
| $INPLACE_EDIT | |
| $^M | 備用記憶體池的大小 |
| $^O | 操作系統名 |
| $OSNAME | |
| $^P | 指定當前調試值的內部變數 |
| $PERLDB | |
| $^T | 從新世紀開始算起,腳步本以秒計算的開始運行的時間 |
| $BASETIME | |
| $^W | 警告開關的當前值 |
| $WARNING | |
| $^X | Perl二進位可執行代碼的名字 |
| $EXECUTABLE_NAME | |
| $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 |
|
|
$+ |
與上個正則運算式搜索格式匹配的最後一個括弧。例如： /Version: (.*)|Revision: (.*)/ && ($rev = $+); |
|
$LAST_PAREN_MATCH |
檔句柄特殊變數
|
$| |
如果設置為零,在每次調用函數write或print後，自動調用函數fflush,將所寫內容寫回檔 |
|
$OUTPUT_AUTOFLUSH |
|
|
$% |
當前輸出頁號 |
|
$FORMAT_PAGE_NUMBER |
|
|
$= |
當前每頁長度。默認為 60。 |
|
$FORMAT_LINES_PER_PAGE |
|
|
$- |
當前頁剩餘的行數 |
|
$FORMAT_LINES_LEFT |
|
|
$~ |
當前報表輸出格式的名稱。默認值是檔句柄名。 |
|
$FORMAT_NAME |
|
|
$^ |
當前報表輸出表頭格式的名稱。默認值是帶尾碼"_TOP"的檔句柄名。 |
|
$FORMAT_TOP_NAME |