perl一次读取多行文本的策略

【perl一次读取多行文本的策略】的更多相关文章

perl一次读取多行文本的策略

在处理文本时,经常遇到这种情况:就是我们须要把两行文本做一个比較,然后选择性输出. 而在while(<FILEHAND>){do something}程序块中默认仅仅能一次读取一行.笔者在这里,举一个简单的样例来说明怎么处理这种情况. 有一个这样一段文本: a 1 2 3 4 a 5 6 7 8 a 6 7 8 9 a 7 8 9 11 a 7 8 9 12 a 13 12 14 15 a 18 14 16 17 a 2 3 4 65 要求是这种:假设上一行的第5列数字大于下一行第二列的数字.…

分享：Perl打开与读取文件的方法

在Perl中可以用open或者sysopen函数来打开文件进行操作,这两个函数都需要通过一个文件句柄(即文件指针)来对文件进行读写定位等操作. Perl打开与读取文件的方法,供大家学习参考.本文转自:http://www.jbxue.com/article/3073.html 在Perl中可以用open或者sysopen函数来打开文件进行操作,这两个函数都需要通过一个文件句柄(即文件指针)来对文件进行读写定位等操作. 下面以open函数为例:1:读:open(文件句柄,"<文件名"…

getline读取整行文本// isprint

getline——读取整行文本这个函数接受两个参数:一个输入流对象和一个string对象.getline函数从输入流的下一行读取,并保存读取的内容到string中,但不包括换行符.和输入操作符不一样的是,getline并不忽略行开头的换行符. 只要getline遇到换行符,即便它是输入的第一个字符,getline也将停止读入并返回. 如果第一个字符就是换行符,即便它是输入的第一个字符,string参数将被置为空string getline函数将istream参数作为返回值,和输入操作符一样也把…

Perl中文件读取操作

Perl中文件读取操作 http://blog.csdn.net/yangxuan12580/article/details/51506216…

perl 利用管道读取压缩文件内容

perl的文件句柄不仅支持普通文件, 还支持管道,今天需要统计一个fastq文件中的序列数和碱基数,而NGS的fastq文件一般都是gzip压缩的,所以需要读取压缩文件中的内容,代码如下: my ($fastq) = @ARGV: my ($reads, $bases) = cal_sequence_info($fastq); print qq{$reads\t$bases\n}; sub cal_sequence_info { my $fastq = shift; my $file_hand…

Perl 语法 - 高级特性

总结: q().qq().qw(同单引号).qx{牢记是花括号},分别是单引号.双引号.创建字符串列表和捕获命令输出. 第9学时其他函数和运算符一件事情可以使用多种方法完成. 有哪些其他的函数和运算符? index().rindex().substr().tr///.printf().堆栈:push().pop().shift().unshift().splice(). 本节主要内容: 对标量进行字符串搜索(之前用正则表达式) 字符替换 print函数数组作为堆栈和队列如何在一个…

Perl输出复杂数据结构：Data::Dumper,Data::Dump,Data::Printer

输出复杂结构 Data::Dumper.Data::Dump.Data::Printer都可以用来输出复杂的数据结构.本文只介绍简单的几个输出形式,以后再需要的地方再详细介绍. 前两者建议传递数据结构的引用给对应的函数.方法,当然直接传递非引用也不会错(标量.数组.哈希或引用都允许).第三个Printer,则可以自动判断是否是引用. 例如,下面的数据结构,一个是复杂的hash,一个是相对简单的匿名数组引用,分别使用这3个模块来输出. %Config = ( 'auto_commit' => '0…