當前位置:
首頁 > 知識 > Perl 特殊變數

Perl 特殊變數

Perl 語言中定義了一些特殊的變數,通常以 $, @, 或 % 作為前綴,例如:$_。

很多特殊的變數有一個很長的英文名,操作系統變數 $! 可以寫為 $OS_ERROR。

如果你想使用英文名的特殊變數需要在程序頭部添加 use English;。這樣就可以使用具有描述性的英文特殊變數。

最常用的特殊變數為 $_,該變數包含了默認輸入和模式匹配內容。實例如下:

實例

#!/usr/bin/perlforeach("Google","Runoob","Taobao"){print$_; print"
";}

執行以上程序,輸出結果為:

GoogleRunoobTaobao

以下實例我們不使用 $_ 來輸出內容:

實例

#!/usr/bin/perlforeach("Google","Runoob","Taobao"){print; print"
";}

執行以上程序,輸出結果為:

GoogleRunoobTaobao

實例中,首先輸出 "Google" ,接著輸出 "Runoob" ,最後輸出 "Taobao" 。

在迭代循環中,當前循環的字元串會放在 $_ 中, 然後 通過 print 輸出。另外 print 在不指定輸出變數,默認情況下使用的也是 $_。

以下是幾處即使沒有寫明 Perl 也會假定使用 $_ 的地方:

  • 各種單目函數,包括像 ord() 和 int() 這樣的函數以及除 "-t"以外所有的文件 測試操作 ("-f","-d"),"-t" 默認操作 STDIN。

  • 各種列表函數,例如 print() 和 unlink()。

  • 沒有使用 "=~" 運算符時的模式匹配操作 "m//"、"s///" 和"tr///"。

  • 在沒有給出其他變數時是 "foreach" 循環的默認迭代變數。

  • grep() 和 map() 函數的隱含迭代變數。

  • 當 "while" 僅有唯一條件,且該條件是對 ""操作的結果進行測試時,$_ 就是存放輸入記錄的默認位置。除了"while" 測試條件之外不會發生這種情況。(助記:下劃線在特定操作中是可以省略的。)


Perl 特殊變數

特殊變數類型

根據特殊的變數的使用性質,可以分為以下幾類:

  • 全局標量特殊變數。

  • 全局數組特殊變數。

  • 全局哈希特殊變數。

  • 全局特殊文件句柄。

  • 全局特殊常量。

  • 正則表達式特殊變數。

  • 文件句柄特殊變數。

全局標量特殊變數

以下列出了所有的標量特殊變數,包含了特殊字元與英文形式的變數:


$_ 默認輸入和模式匹配內容。
$ARG
$. 前一次讀的文件句柄的當前行號
$NR
$/ 輸入記錄分隔符,默認是新行字元。如用undef這個變數,將讀到文件結尾。
$RS
$, 輸出域分隔符
$OFS
$ 輸出記錄分隔符
$ORS
$" 該變數同 $,類似,但應用於向雙引號引起的字元串(或類似的內插字元串)中內插數組和切片值的場合。默認為一個空格。
$LIST_SEPARATOR
$; 在模擬多維數組時使用的分隔符。默認為 "34"。
$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 "
"".
$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

喜歡這篇文章嗎?立刻分享出去讓更多人知道吧!

本站內容充實豐富,博大精深,小編精選每日熱門資訊,隨時更新,點擊「搶先收到最新資訊」瀏覽吧!


請您繼續閱讀更多來自 程序員小新人學習 的精彩文章:

jQuery UI 使用
jQuery UI編程的 ThemeRoller

TAG:程序員小新人學習 |