歡迎來到Linux教程網
Linux教程網
Linux教程網
Linux教程網
您现在的位置: Linux教程網 >> UnixLinux >  >> Unix知識 >> 關於Unix

Perl的經典用法:用Open()函數打開文件

打開文件的常用方法是: open(FH, " filename") or die "Couldn't open filename for reading: !"; open() 函數通常帶有兩個參數,第一個為文件句柄,用於指向打開的文件, 第二個參數是文件名及模式(文件的打開模式)的混合體,如果文件被成功打開, 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, "
  
  or die "Can't open /var/log/file.pod for writing : $!";

Copyright © Linux教程網 All Rights Reserved