PERL
UncleTuu
这个作者很懒,什么都没留下…
展开
-
perl中二维哈希的使用
使用$hash{$key1}{$key2} = $value;遍历(注意加粗与加下划线的语句)foreach my $key1 (keys %hash){ my $hash2 = $hash{$key1}; foreach my $key2 (sort{$hash2->{$b}$hash2->{$a}} keys原创 2010-03-19 10:39:00 · 6989 阅读 · 1 评论 -
PERL管道读压缩文件
gz格式:open IN, "gzip -dc $infile |" or die "cannot open $infile file/n";tgz(tar.gz)格式:open IN, "tar xf $infile -O|" or die "cannot open $infile file/n";7zip格式:open IN, "7za e -so $infile |"原创 2010-03-28 16:03:00 · 893 阅读 · 0 评论