用perl读写二进制的文件
2014-02-10 14:26
344 查看
open(FP, $file) || die "cannot open file $!"; binmode(FP); open(TMPFP, ">a.tmp"|| die "cannot open file $!"; binmode(TMPFP); my $buffer = ""; while(read(FP, $buffer, 1024)) { syswrite(TMPFP, $buffer, length($buffer)); print "$buffer"; print '=' x 24; } close(FP); close(TMPFP);
相关文章推荐
- perl 二进制文件读写
- 二进制文件读写
- C++读写二进制文件
- C#读写二进制文件
- C语言及程序设计进阶例程-37 二进制文件及其读写
- perl 读写文件
- 转 Qt 二进制文件读写
- C++/C 文件二进制读写
- C#二进制文件读写
- 文件读写: 二进制方式和文本方式的区别
- 二进制文件的读写操作
- C语言实现二进制文件读写
- C/C++读写二进制文件
- 【利用perl的基因数据处理】1.基础的的DNA文件读写和碱基特征统计
- 文件读写:fwrite与fprintf的区别(即二进制方式和文本方式的区别)
- 读写大“二进制”文件,不必申请很大内存(fopen,fread,fwrite,fclose)
- C++:读写二进制文件到double数组
- open语句对文本和二进制文件的读写
- Perl读写文件&字符串操作
- 浅谈二进制文件读写和文本文件读写的区别