代码之家  ›  专栏  ›  技术社区  ›  Structure

grep可以用于Perl变量吗?

  •  1
  • Structure  · 技术社区  · 16 年前

    在Perl脚本中,是否可能以某种方式对Perl变量有效地执行grep?一个等价的Perl函数同样可以接受,我只想让解决方案尽可能简单。

    例如:

    #!/usr/bin/perl
    #!/bin/grep
    
    $var="foobar";
    
    $newvar="system('grep -o "foo" $var');
    
    sprintf $newvar;
    

    我期待的地方 sprintf $newvar 输出 foo .

    也欢迎任何有关最佳实践的反馈。我对Perl不太熟悉。

    1 回复  |  直到 16 年前
        1
  •  5
  •   ghostdog74    16 年前

    您可以在Perl中使用regex匹配。无需调用外部“grep”命令。

    $var =~ /foo/;
    

    请阅读文档 perlrequick 有关如何在变量中搜索模式的介绍。Perl自己也很感兴趣 grep .

    $var="foobar";
    if ( $var =~ /foo/){
      print "found foo\n";
    }