2009/02/15
Perlで書く 2009.02.15 Vol.228
===================================================================== Perlで書く 2009.02.15 Vol.228 [WAZA]ファイルを一文字列として読み込む http://www2u.biglobe.ne.jp/~MAS/perl/ ===================================================================== ●ファイルを一文字列として読み込む File::SlurpモジュールやPath::Classモジュールを使うと簡単です。 モジュールを使わない方法としては、特殊変数$/にundefを設定する方法が 簡単です。この場合、そのまま$/を変更するとプログラム全体に影響を及ぼす のでlocalで影響範囲を限定した方が良いです。 --------------------------------------------------------------------- use strict; use warnings; use File::Slurp; my $filename = '/home/user1/data.txt'; my $text = File::Slurp::read_file($filename); print $text; --------------------------------------------------------------------- use strict; use warnings; use Path::Class; my $filename = '/home/user1/data.txt'; my $text = Path::Class::file($filename)->slurp; print $text; --------------------------------------------------------------------- use strict; use warnings; my $filename = '/home/user1/data.txt'; open my $fh, '<', $filename or die $!; my $doc; { local $/ = undef; $doc = <$fh>; } print $doc; --------------------------------------------------------------------- use strict; use warnings; my $filename = '/home/user1/data.txt'; open my $fh, '<', $filename or die $!; my $doc = do { local $/ = undef; <$fh>; }; print $doc; --------------------------------------------------------------------- ●関連項目 ・空行を区切り文字として読み込む http://www2u.biglobe.ne.jp/~MAS/perl/waza/feline.html ===================================================================== ■雑記 モダンPerl入門の一部がPDFで公開されました(*1)。第6章「テストの薦め」 の一部と第9章「押さえておきたいPerlの基礎」の一部を読むことができます。 *1 http://codezine.jp/article/detail/3563 ===================================================================== Perlで書く(マガジンID:0000109251) 配信数:850 発行者:MAS 本メールマガジンに関するご意見・お問い合わせは t-masuda@mvd.biglobe.ne.jp までお寄せ下さい。 解除 http://www2u.biglobe.ne.jp/~MAS/perl/magazine.html 検索 http://www2u.biglobe.ne.jp/~MAS/perl/search/index.html バックナンバー http://archive.mag2.com/0000109251/index.html RSS http://archive.mag2.com/0000109251/rss10.xml 本メールマガジンは「まぐまぐ」 http://www.mag2.com/ を利用して発行 しています。 =====================================================================


