perlでfileを変数に読込む処理をネットで探しても解説がメインでコレだといったものがなかったのでメモ
#!/usr/bin/perl
$file = '/tmp/test';
open my $fh, '<', $file
or die $!;
my $content = do { local $/; <$fh> };
close $fh;
print $content;
もっとベターな書き方があれば教えてください
More than 5 years have passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme