一、打開、關閉文件

語法為open (filevar, filename)，其中filevar為文件句柄，或者說是程序中用來代表某文件的代號，filename為文件名，其路徑可為相對路徑，亦可為絕對路徑。
代碼如下:
 open(FILE1,"file1");
 open(FILE1, "/u/jqpublic/file1");

打開文件時必須決定訪問模式，在PERL中有三種訪問模式：讀、寫和添加。后兩種模式的區別在于寫模式將原文件覆蓋，原有內容丟失，形式為：open (outfile,">outfile")；而添加模式則在原文件的末尾處繼續添加內容，形式為：open(appendfile, ">>appendfile")。要注意的是：不能對文件同時進行讀和寫/添加操作。
open的返回值用來確定打開文件的操作是否成功，當其成功時返回非零值，失敗時返回零，因此可以如下判斷：
代碼如下:
if (open(MYFILE, "myfile")) {
# here's what to do if the file opened successfully
}

當文件打開失敗時結束程序：
代碼如下:
unless (open (MYFILE, "file1")) {
 die ("cannot open input file file1/n");
}

亦可用邏輯或操作符表示如下：
代碼如下:
 open (MYFILE, "file1") || die ("Could not open file");

當文件操作完畢后，用close(MYFILE); 關閉文件。

二、讀文件

語句$line =<> ;從文件中讀取一行數據存儲到簡單變量$line中并把文件指針向后移動一行。為標準輸入文件，通常為鍵盤輸入，不需要打開。語句@array = <>;把文件的全部內容讀入數組@array，文件的每一行(含回車符)為@array的一個元素。

三、寫文件

形式為：
代碼如下:
 open(OUTFILE, ">outfile");
 print OUTFILE ("Here is an output line./n");

注：STDOUT、STDERR為標準輸出和標準錯誤文件，通常為屏幕，且不需要打開。

四、判斷文件狀態
1、文件測試操作符
 語法為：-op expr，如：
代碼如下:
if (-e "/path/file1") {
 print STDERR ("File file1 exists./n");
}

文件測試操作符
操作符 描述
-b 是否為塊設備
-c  是否為字符設備
-d  是否為目錄
-e  是否存在
-f  是否為普通文件
-g  是否設置了setgid位
-k  是否設置了sticky位
-l  是否為符號鏈接
-o  是否擁有該文件
-p  是否為管道
-r  是否可讀
-s  是否非空
-t  是否表示終端
-u  是否設置了setuid位
-w  是否可寫
-x  是否可執行
-z  是否為空文件
-A  距上次訪問多長時間
-B  是否為二進制文件
-C  距上次訪問文件的inode多長時間
-M  距上次修改多長時間