| 導購 | 订阅 | 在线投稿
分享
 
 
 

Perl的經典用法

2008-06-01 01:10:26  編輯來源:互聯網  简体版  手機版  移動版  評論  字體: ||

用Open() 函數打開文件

打開文件的常用方法是:

open(FH, "< $filename")

or die "Couldn't open $filename for reading: $!";

open() 函數通常帶有兩個參數,第一個爲文件句柄,用于指向打開的文件,第二個參數是文件名及模式(文件的打開模式)的混合體,假如文件被成功打開,open()函數返回true,否則爲false。我們用「or」來測試該條件。

上述代碼中的模式由小于字符(<)來表示。假如文件不存在,open()將返回false。此時,你可以讀文件句柄,但不可以寫。

大于字符表示寫。假如文件不存在,就會被創建。假如文件存在,文件被清除,以前的數據將會丟失。你可以寫入文件句柄,但不可以讀入。

# 假如文件不存在,就創建它

open(FH, "> $filename")

or die "Couldn't open $filename for writing: $!";

假如文件不存在,添加模式(用兩個大于符號表示)可以用來創建新文件,假如文件存在,該模式並不會清除原來的數據。

同「<」或「讀」模式一樣,你只能對文件句柄進行寫操作。 (所以的寫入內容都添加到文件尾)。企圖進行讀操作,會産生運行錯誤。

open(FH, ">> $filename")

or die "Couldn't open $filename for appending: $!";

通過「+<」模式,你可以既可以讀文件,又可以寫文件。你可以通過tell() 函數在文件內部移動,通過seek()函數進行定位。假如文件不存在,就會被創建。假如文件已經存在,原來的數據不會被清除。

假如你打算清除原來的文件內容,或者自己調用truncate() 函數,或者使用「+>」模式。

open(FH, "+> $filename")

or die "Couldn't open $filename for reading and writing: $!";

注重「+<」和「+>」的區別,兩者都可以可讀可寫。前者爲非破壞性寫,後者爲破壞性寫。

錯誤

錯誤是如何出現的?很多地方都會出現錯誤:如目錄不存在,文件不可寫入,你的程序丟失了文件句柄等等。

你應該檢查系統調用的結果 (如open() 和sysopen()),看看是否調用成功。

爲了幫助用戶查錯,通常使用「or die()」,你應記住這些用法。首先,應寫出系統調用失敗(「open」)的信息。其次,應寫出文件名的信息,以便修正錯誤時更輕易地定位。第三,要寫出打開文件的方式, (「for writing,」「for appending」)。第四,輸出操作系統的出錯信息(包含在$!中)。這樣,一旦出現文件不能打開的問題,使用你的程序的用戶會大體上知道爲什麽不能打開。有時,我們把第一個和第三個合並在一起:

or die "unable to append to $filename: $!";

假如在open() 和出錯信息中都寫了文件的全名,你會冒改變了open() 的風險,使得出錯信息不合時宜或不正確。

# 下面會出現虛假的出錯信息

open(FH, "</var/run/file.pid")

or die "Can't open /var/log/file.pod for writing : $!";

用 Sysopen()進行更多的控制

爲了更好的控制文件的打開方式,可以使用 sysopen() 函數:

use Fcntl;

sysopen(FH, $filename, O_RDWR|O_CREAT, 0666)

or die "Can't open $filename for reading/writing/creating : $!";

函數 sysopen() 帶有四個參數,第一個是同open()函數類似的文件句柄參數,第二個參數是不帶模式信息的文件名,第三個參數是模式參數,由Fcntl 模塊提供的邏輯OR運算組合起來的常數構成,第四個參數(可選),爲八進制屬性值(0666表示數據文件, 0777表示程序)。假如文件可以被打開,sysopen() 返回true,假如打開失敗,則返回false。

不同于open()函數,sysopen()不提供模式說明的簡寫方式,而是把一些常數組合起來,而且,每個模式常數有唯一的含義,只有通過邏輯OR運算才能將它們組合起來,你可以設置多個行爲的組合。

O_RDONLYRead-only

O_WRONLY Write-only

O_RDWR Reading and writing

O_APPEND Writes go to the end of the file

O_TRUNC Truncate the file if it existed

O_CREAT Create the file if it didn't exist

O_EXCLError if the file already existed (used with O_CREAT)

當你需要小心行事的時候,就使用sysopen() 函數,例如,假如你打算添加內容到文件中,假如文件不存在,不創建新文件,你可以這樣寫:

sysopen(LOG, "/var/log/myprog.log", O_APPEND, 0666)

or die "Can't open /var/log/myprog.log for appending: $!";

作 者:不詳

--

用Open() 函數打開文件 打開文件的常用方法是: open(FH, "< $filename")  or die "Couldn't open $filename for reading: $!"; open() 函數通常帶有兩個參數,第一個爲文件句柄,用于指向打開的文件,第二個參數是文件名及模式(文件的打開模式)的混合體,假如文件被成功打開,open()函數返回true,否則爲false。我們用「or」來測試該條件。 上述代碼中的模式由小于字符(<)來表示。假如文件不存在,open()將返回false。此時,你可以讀文件句柄,但不可以寫。 大于字符表示寫。假如文件不存在,就會被創建。假如文件存在,文件被清除,以前的數據將會丟失。你可以寫入文件句柄,但不可以讀入。 # 假如文件不存在,就創建它 open(FH, "> $filename")  or die "Couldn't open $filename for writing: $!"; 假如文件不存在,添加模式(用兩個大于符號表示)可以用來創建新文件,假如文件存在,該模式並不會清除原來的數據。 同「<」或「讀」模式一樣,你只能對文件句柄進行寫操作。 (所以的寫入內容都添加到文件尾)。企圖進行讀操作,會産生運行錯誤。 open(FH, ">> $filename")  or die "Couldn't open $filename for appending: $!"; 通過「+<」模式,你可以既可以讀文件,又可以寫文件。你可以通過tell() 函數在文件內部移動,通過seek()函數進行定位。假如文件不存在,就會被創建。假如文件已經存在,原來的數據不會被清除。 假如你打算清除原來的文件內容,或者自己調用truncate() 函數,或者使用「+>」模式。 open(FH, "+> $filename")  or die "Couldn't open $filename for reading and writing: $!"; 注重「+<」和「+>」的區別,兩者都可以可讀可寫。前者爲非破壞性寫,後者爲破壞性寫。 錯誤 錯誤是如何出現的?很多地方都會出現錯誤:如目錄不存在,文件不可寫入,你的程序丟失了文件句柄等等。 你應該檢查系統調用的結果 (如open() 和sysopen()),看看是否調用成功。 爲了幫助用戶查錯,通常使用「or die()」,你應記住這些用法。首先,應寫出系統調用失敗(「open」)的信息。其次,應寫出文件名的信息,以便修正錯誤時更輕易地定位。第三,要寫出打開文件的方式, (「for writing,」「for appending」)。第四,輸出操作系統的出錯信息(包含在$!中)。這樣,一旦出現文件不能打開的問題,使用你的程序的用戶會大體上知道爲什麽不能打開。有時,我們把第一個和第三個合並在一起: or die "unable to append to $filename: $!"; 假如在open() 和出錯信息中都寫了文件的全名,你會冒改變了open() 的風險,使得出錯信息不合時宜或不正確。 # 下面會出現虛假的出錯信息 open(FH, "</var/run/file.pid")  or die "Can't open /var/log/file.pod for writing : $!"; 用 Sysopen()進行更多的控制 爲了更好的控制文件的打開方式,可以使用 sysopen() 函數: use Fcntl; sysopen(FH, $filename, O_RDWR|O_CREAT, 0666) or die "Can't open $filename for reading/writing/creating : $!"; 函數 sysopen() 帶有四個參數,第一個是同open()函數類似的文件句柄參數,第二個參數是不帶模式信息的文件名,第三個參數是模式參數,由Fcntl 模塊提供的邏輯OR運算組合起來的常數構成,第四個參數(可選),爲八進制屬性值(0666表示數據文件, 0777表示程序)。假如文件可以被打開,sysopen() 返回true,假如打開失敗,則返回false。 不同于open()函數,sysopen()不提供模式說明的簡寫方式,而是把一些常數組合起來,而且,每個模式常數有唯一的含義,只有通過邏輯OR運算才能將它們組合起來,你可以設置多個行爲的組合。 O_RDONLYRead-only O_WRONLY Write-only O_RDWR Reading and writing O_APPEND Writes go to the end of the file O_TRUNC Truncate the file if it existed O_CREAT Create the file if it didn't exist O_EXCLError if the file already existed (used with O_CREAT) 當你需要小心行事的時候,就使用sysopen() 函數,例如,假如你打算添加內容到文件中,假如文件不存在,不創建新文件,你可以這樣寫: sysopen(LOG, "/var/log/myprog.log", O_APPEND, 0666) or die "Can't open /var/log/myprog.log for appending: $!"; 作 者:不詳 --
󰈣󰈤
王朝萬家燈火計劃
期待原創作者加盟
 
 
 
>>返回首頁<<
 
 
 
 
 熱帖排行
 
王朝網路微信公眾號
微信掃碼關註本站公眾號 wangchaonetcn
 
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有