+ -
当前位置:首页 → 问答吧 → 提取两行之间的文本,放到变量里该怎么写

提取两行之间的文本,放到变量里该怎么写

时间:2010-11-25

来源:互联网

open(INPUT,"FILE") || die "can't open";

        while($line=<INPUT>) {
            if ( $line=~/START/../END/ ){
                print $line;
            }
        }
        close(INPUT);

这种写法该怎么写呢,我要放到$line变量里

作者: richiewu   发布时间: 2010-11-25

回复 richiewu


    if ( $line=~/START/../END/这里写错了吧

作者: wtuter   发布时间: 2010-11-25

我就是不知道这里该怎么写
一般的写法是

open(INPUT,"FILE") || die "can't open";

        while(<INPUT>) {
            if (/START/../END/ ){
                print $line;
            }
        }
        close(INPUT);

作者: richiewu   发布时间: 2010-11-25

楼主一定没学过字符串连接。

作者: flw   发布时间: 2010-11-25

本帖最后由 zhlong8 于 2010-11-25 19:18 编辑

回复 wtuter


    用法没什么问题吧?
    我错了:) 应该是 $line =~ /START/ .. $line =~ /END/

作者: zhlong8   发布时间: 2010-11-25