將檔案拖入陣列變數
open(my $fh, '<', "/some/path") or die $!;
my @ary = <$fh>;
在列表上下文中進行求值時，菱形運算子返回一個由檔案中所有行組成的列表（在這種情況下，將結果分配給陣列耗材列表上下文）。保留行終止符，可以通過 chomping 刪除：
chomp(@ary); #removes line terminators from all the array elements.
open(my $fh, '<', "/some/path") or die $!;
my @ary = <$fh>;
在列表上下文中進行求值時，菱形運算子返回一個由檔案中所有行組成的列表（在這種情況下，將結果分配給陣列耗材列表上下文）。保留行終止符，可以通過 chomping 刪除：
chomp(@ary); #removes line terminators from all the array elements.