您好,登錄后才能下訂單哦!
這篇文章將為大家詳細講解有關Perl中有哪些文件讀寫方法,文章內容質量較高,因此小編分享給大家做個參考,希望大家閱讀完這篇文章后對相關知識有一定的了解。
一、打開、關閉Perl文件
語法為open(filevar,filename),其中filevar為Perl文件句柄,或者說是程序中用來代表某Perl文件的代號,filename為Perl文件名,其路徑可為相對路徑,亦可為絕對路徑。
open(FILE1,"file1");
open(FILE1,"/u/jqpublic/file1");
打開Perl文件時必須決定訪問模式,在PERL中有三種訪問模式:讀、寫和添加。后兩種模式的區別在于寫模式將原Perl文件覆蓋,原有內容丟失,形式為:open(outfile,">outfile");而添加模式則在原Perl文件的末尾處繼續添加內容,形式為:open(appendfile,">>appendfile")。要注意的是,不能對Perl文件同時進行讀和寫/添加操作。
open的返回值用來確定打開Perl文件的操作是否成功,當其成功時返回非零值,失敗時返回零,因此可以如下判斷:
if(open(MYFILE,"myfile")){
#here'swhattodoifthefileopenedsuccessfully
}
當Perl文件打開失敗時結束程序:
unless(open(MYFILE,"file1")){
die("cannotopeninputfilefile1\n");
}
亦可用邏輯或操作符表示如下:
open(MYFILE,"file1")||die("Couldnotopenfile");
當Perl文件操作完畢后,用close(MYFILE);關閉Perl文件。
二、讀Perl文件
語句$line=;從Perl文件中讀取一行數據存儲到簡單變量$line中并把Perl文件指針向后移動一行。為標準輸入Perl文件,通常為鍵盤輸入,不需要打開。
語句@array=;把Perl文件的全部內容讀入數組@array,Perl文件的每一行(含回車符)為@array的一個元素。
三、寫Perl文件
形式為:
open(OUTFILE,">outfile");
printOUTFILE("Hereisanoutputline.\n");
注:STDOUT、STDERR為標準輸出和標準錯誤Perl文件,通常為屏幕,且不需要打開。
四、判斷Perl文件狀態
1、Perl文件測試操作符
語法為:-opexpr,如:
if(-e"/path/file1"){
printSTDERR("Filefile1exists.\n");
}
關于Perl中有哪些文件讀寫方法就分享到這里了,希望以上內容可以對大家有一定的幫助,可以學到更多知識。如果覺得文章不錯,可以把它分享出去讓更多的人看到。
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。