在Perl中，可以使用<FILEHANDLE>的方式來讀取文件的每一行內容。具體步驟如下：
open my $fh, '<', 'filename.txt' or die "Cannot open file: $!";
while循環讀取文件的每一行內容直到文件末尾：while (my $line = <$fh>) {
# 在這里處理每一行的內容，例如打印到屏幕
print $line;
}
close $fh;
通過以上步驟，可以逐行讀取文件的內容并進行相應的處理。
