perl文件读取的几种处理方式小结

 更新时间:2013年02月08日 20:14:58   作者:  
perl打开文件后,可以有几种方式对文件进行读取处理(根据文件大小,文件内容的特征和其它要处理的方式)

1、单行(大文件处理):

复制代码 代码如下:

my $oneline = <$FL> 或
while($line=<H>)
{ }

2、读取全部(小文件处理):

复制代码 代码如下:

open (my $in, "path ") or die "open error: $! ";
my @lines = <$in> ;

3、读3行(大文件及特殊处理需要):

复制代码 代码如下:

open (my $in, "path ") or die "open error: $! ";
my @lines;
push (@lines, scalar <$in> ) for (1..3);

4、每次按条件读入三行,并且按照条件输出两行。或根据其他具体要求修改达到相应目的。

复制代码 代码如下:

while (<TEST>) {
    if(index ($_, "=") > -1){
       my $position=tell(TEST);
       my $keyword_line=$_;
       my $line_1=<TEST>;
       my $line_2=<TEST>;
    # @a=split//,$keyword_line;  比较它们的元素是否相等,一直没成功
    # @b=split//,$line_1;         利用if ($a[0]eq $a[0])来判断
    # @c=split//,$line_2;
         if (($line_2)&&(index($line_2, "=")>-1)){ # 或者if ($line_2=~/=/)
            print OUTFILE "$_$line_1";
          }
    if (!($line_2)) { print OUTFILE "$_$line_1"; last; }
    seek(TEST, $position, 0);
      }
  }

您可能感兴趣的文章:

相关文章

  • perl实现检测服务器中的服务是否正常脚本分享

    perl实现检测服务器中的服务是否正常脚本分享

    这篇文章主要介绍了perl实现检测服务器中的服务是否正常脚本分享,本文脚本用于检测Linux服务器的服务是否正常,需要的朋友可以参考下
    2014-10-10
  • perl 调试命令的相关知识小结

    perl 调试命令的相关知识小结

    有关 perl 调试命令的相关知识,有需要的朋友可以参考下
    2013-02-02
  • perl的logwrapper使用实例代码

    perl的logwrapper使用实例代码

    perl的logwrapper可以对任何的函数将标准输出和错误输出重定向到对应的log文件
    2013-02-02
  • perl查找进程PID的例子

    perl查找进程PID的例子

    这篇文章主要介绍了perl查找进程PID的例子,例子中主要通过/proc目录进行PID的查找,需要的朋友可以参考下
    2014-06-06
  • perl的INC设置分析

    perl的INC设置分析

    perl的INC变量包含了所有perl module的查找路径,可以使用perl -V 来查看INC的值
    2013-02-02
  • Perl学习教程之单行命令详解

    Perl学习教程之单行命令详解

    这篇文章主要给大家介绍了关于Perl学习教程之单行命令的相关资料,文中给出了详细的示例代码供大家参考学习,对大家学习或者使用perl具有一定的参考学习价值,需要的朋友可以参考借鉴,下面来一起看看吧。
    2017-09-09
  • python urllib中的编码处理示例

    python urllib中的编码处理示例

    这篇文章主要介绍了python urllib中的编码处理示例,本文直接给出几个处理实例,需要的朋友可以参考下
    2015-04-04
  • Perl中的控制结构学习笔记

    Perl中的控制结构学习笔记

    这篇文章主要介绍了Perl中的控制结构学习笔记,本文讲解了条件语句if、条件语句unless、循环语句while、循环语句until、for循环、foreach语句、循环控制等内容,需要的朋友可以参考下
    2014-11-11
  • perl文件读取的几种处理方式小结

    perl文件读取的几种处理方式小结

    perl打开文件后,可以有几种方式对文件进行读取处理(根据文件大小,文件内容的特征和其它要处理的方式)
    2013-02-02
  • About Perl(翻译Perl官网介绍)

    About Perl(翻译Perl官网介绍)

    这篇文章主要介绍了About Perl(翻译Perl官网介绍),本文翻译自Perl官网介绍,讲解什么是Perl、Perl的历史、Perl 5 特征、Perl在WEB环境下的使用等内容,需要的朋友可以参考下
    2015-06-06

最新评论