[求助]如何用perl动态处理压缩成gz的文本文件？

galaxy001

只读访问，主要是顺序读取，可能有随机访问的要求。
由于是很容易压的大文本文件，我想以gz的形式节约磁盘空间。请问如何实现？
临时解压的就不算了。

至于写入gz，应该是不能实现的，对吗？

————————————————————
方便的话先写个顺序读取的例子吧，用管道的就行（其实我不熟这方面的语法
Linux环境

[ 本帖最后由 galaxy001 于 2008-6-2 21:23 编辑 ]

galaxy001

我直接问如何用 gzip -c foo.gz 实现顺序读取吧。就是管道语句咋写。关perl的文件句柄是否要注意别的。
假设程序的目的就是每次读一行再原样打印。

'foo.gz'请用变量来装，我担心管道语句用变量会有特殊的地方

[ 本帖最后由 galaxy001 于 2008-6-2 22:02 编辑 ]

churchmice

1. 
   
2. my $gzfile = "foo.gz";
   
3. open( my $file,"gunzip -c $gzfile|") or die "Fail $!";
   

复制代码

没有什么特别的，建议你好好看看perl的变量替换机制

[ 本帖最后由 churchmice 于 2008-6-3 12:40 编辑 ]