gzipで圧縮されたファイルを一行づつ読む。
めもめも
#!/usr/bin/perl use strict; use warnings; use IO::Zlib; my $fh = IO::Zlib->new(); if ($fh->open("test.txt.gz", "rb")) { while (my $line = $fh->getline()){ print {*STDOUT} $line; } $fh->close(); }
- 作者: Dave Taylor,酒井皇治
- 出版社/メーカー: オライリージャパン
- 発売日: 2006/03/01
- メディア: 単行本(ソフトカバー)
- 購入: 5人 クリック: 80回
- この商品を含むブログ (30件) を見る