在Perl中，可以使用open()函数来打开文件。以下是打开文件的常见步骤：
open()函数来打开文件。open()函数接受两个参数：文件句柄和文件名。文件句柄是一个标识符，用于在后续的操作中引用该文件。open(my $file_handle, '<', 'filename.txt') or die "无法打开文件: $!";
上述代码中，$file_handle是文件句柄，filename.txt是要打开的文件名。<表示以只读模式打开文件。如果文件无法打开，die会输出错误信息并退出程序。
readline()函数或者<FILE_HANDLE>语法来逐行读取文件内容。while (my $line = <$file_handle>) {
# 处理每一行的内容
print $line;
}
上述代码中，<$file_handle>用于读取文件句柄所关联文件的下一行内容。将读取的内容赋值给变量$line，然后在循环体中处理每一行的内容。
close()函数关闭文件。close $file_handle;
上述代码中，$file_handle是要关闭的文件句柄。
完整示例代码：
open(my $file_handle, '<', 'filename.txt') or die "无法打开文件: $!";
while (my $line = <$file_handle>) {
print $line;
}
close $file_handle;
上述代码会打开文件filename.txt，逐行读取文件内容并输出，然后关闭文件。
