- バックアップ一覧
- 差分 を表示
- 現在との差分 を表示
- ソース を表示
- Perl/ファイルシステム/ファイル読み込み へ行く。
- 1 (2011-06-11 (土) 14:21:01)
ファイルの内容をすべて読み込み変数に格納する - Path::Class
use Path::Class qw/file/;
my $contents = file('/homo/taro/foo.txt')->slurp(iomode => '<:encoding(euc-jp)');
use Path::Class qw/file/;
my $contents = file('/homo/taro/foo.txt')->slurp(iomode => '<:encoding(euc-jp)');