open(my $in, "<", "file.txt")
or die "can't open file: $!";
my (@line) = <$in>;
close($in);
----------------------------------------------------
「ファイルを開いて読みこむ」場面ってよくあると思うんですけど
そういう「開いて読みこんで閉じる」関数ってあるのですか?
4 行書くより一行で書けるならラクなんですが