精华内容
下载资源
问答
  • perl正则匹配

    2008-10-16 09:38:00
    字符的种类是一定的,无非是空格,数字,大小写字母,-_+=和perl中定义的元字符,还有本国语言。所以原则上任何格式的字符都能匹配匹配工具:选择符号,关键字,量词,断言,转义字符当出现多个字符组成的 非空格...

    字符的种类是一定的,无非是空格,数字,大小写字母,-_+=和perl中定义的元字符,还有本国语言。所以原则上任何格式的字符都能匹配。

    匹配工具:选择符号,关键字,量词,断言,转义字符

    当出现多个字符组成的 非空格字符时候, 例如123,45-3_s_SDGG 则使用[0-9A-Za-z-_,]{1,} 若加上^$则只能匹配一行中仅有这些字符的且连贯组成的字符串。

    转义字符/S可以使得匹配的范围加宽,使用时注意

    使用断言可以使得匹配更为精确,但是有可能匹配不到。

    在读程序时候,如果有else的时候,应当考虑什么时候else成立,凡是从正反两方面考虑,才不会出错。

     

    展开全文
  • # 3、A、中文编码 从文件夹读文件 (问原文标记还是输出歧义句子) # 写文件的时候每次文件名字加一(之前有处理过分文件) # B、提取“ |/w |/w |/w”之前的中文句子进行判断 # C、判断分为几个情况 ...
    # 3、A、中文编码 从文件夹读文件 (问原文标记还是输出歧义句子)
        # 写文件的时候每次文件名字加一(之前有处理过分文件)
       # B、提取“  |/w  |/w  |/w”之前的中文句子进行判断
       # C、判断分为几个情况
          # * 含有“/k” 无操作
          # * 含有“/ni” 无操作
          # * 只要含有“d” “r” “c” 有歧义
          # * 开头含有“ v | u | p”  :(.*) $1 =~ "/v || /u || /p"
          # * 开头含有“m” + "q" 或者 “m” + "n"  : $1=~ "m" && $2=~ "q" || $2=~ "n"
          # * 开头有 “和”  看前两个字
          # * 结尾不是“/n”   .* (.*) 
          
    use Encode;
    #use utf8;
    $Utf8;
          
    open(In,"100001.txt"); #迈向/v 充满/v 希望/n 的/u 新/a 世纪/n
    open(out,">tanhao.txt"); 
    @Lines=<In>;
    $n=0;
    chomp(@Lines);
    foreach $OnelIne(@Lines){
        $n++;
        #print $OnelIne;
        #$OnelIne = decode("GBK", $OnelIne);
        #if($OnelIne =~ /\/k/ || $OnelIne =~ /\/ni/) next;
        if($OnelIne =~ /\/d/ ||$OnelIne =~ /\/r/ ||$OnelIne =~ /\/c/){
            print out $n."_".$OnelIne .="   !\n";
            next;
        }
        if($OnelIne =~ /(.*)\s(.*)/){ 
            if($1 =~ ~/[vup]/){
                print out $n."_".$OnelIne .="   !\n";
                next;
            }
        }
        if($OnelIne =~ /(.*)\s+(.*)\s+(.*)/){ 
            if($1 =~/\/m/ && $2 =~ /[qn]/){
                print out $n."_".$OnelIne .="   !\n";
                next;
            }
        }
        if($OnelIne =~ /[^\/n]\/s\|\/w/){
            print out $n."_".$OnelIne .="   !\n";
            next;    
        }
        
    }
    close(In);
    close(out);

    一个标注网站:http://www.aihanyu.org/cncorpus/CpsWParser.aspx

    展开全文
  • 0.正则匹配字典:http://www.cnblogs.com/itech/archive/2010/03/19/1689793.html 1.$/=">";重新定义字符串分隔符为“>”. 2.perl 中/ms,/msg,/gms是什么意思? 正则表达式中,//msg和//gms意思一样。 //g...

    0.正则匹配字典:http://www.cnblogs.com/itech/archive/2010/03/19/1689793.html

    1.$/=">";重新定义字符串分隔符为“>”.

    2.perl 中/ms,/msg,/gms是什么意思?

    正则表达式中,//msg和//gms意思一样。

    //g表示找出字符串中所有匹配的部分,如$x= "cat dog house"; @words = ($x =~ /(\w+)/g);  #结果 $word[0] = 'cat' $word[1] = 'dog' $word[2] = 'house' 

    //m表示把字符串看成多行数据。'.'匹配除"\n"外任何字符。 ^和 $, 匹配字符串中任何行的开头或结尾

    //s表示把字符串看成单行数据。'.'匹配任何字符,包括"\n"。 ^和 $,只匹配字符串的开头或结尾

    //ms表示把字符串看成单行数据。 '.'匹配任何字符,包括"\n"。 ^和 $, 匹配字符串中任何行的开头或结尾

     

    转载于:https://www.cnblogs.com/Formulate0303/p/8488106.html

    展开全文
  • perl 正则匹配的次数

    千次阅读 2014-04-14 11:33:56
    正则匹配中它们是非常有用的。 ?:匹配前面的表达式0次或1次    当该字符紧跟在任何一个其他限制符 (*, +, ?, {n}, {n,}, {n,m}) 后面时,  匹配模式是非贪婪的。 * :匹配前面的表达式0次或多次 ...
    在perl中的正则表达式中有几个特殊字符是用来匹配表达式的次数的,使用的时候要特别注意,
    在正则匹配中它们是非常有用的。


    ?:匹配前面的表达式0次或1次
     
      当该字符紧跟在任何一个其他限制符 (*, +, ?, {n}, {n,}, {n,m}) 后面时,
       匹配模式是非贪婪的。

    * :匹配前面的表达式0次或多次
    + :匹配前面的表达式1次或多次

    例:
    /a(bc)?/ 能匹配a,abc
    /a(bc)*/ 能匹配a,abc,abcbc
    /a(bc)+/ 能匹配abc,abcbc

    展开全文
  • 有这么一道题。。 aaa bbb #ifdefined(__MMI_DEL__) ccc #endif ddd eee #ifdefined(__MMI_DEL__) fff ggg #endif hhh ...要求匹配 注释外的内容,匹配之后的内容: aaa bbb ddd...
  • perl 正则匹配多个

    千次阅读 2016-12-06 19:26:55
    Vsftp:/root# cat k1.pl my $_='upDaTe'; if( $_ =~ /^(SELECT|UPDATE|DELETE|INSERT|SET|COMMIT|ROLLBACK|CREATE|DROP|ALTER|CALL)/i){print "1111111111111\n";...Vsftp:/root# perl k1.pl 1111111111111
  • perl 正则匹配代码

    2015-01-05 14:51:00
    36 chomp $line; 37 my @vec = split /\t/, $line; 38 my @vec2 = ($vec[1]=~/[a-z]+/g); 39 my $size = scalar @vec2; 40 if ($size ==1) ...
  • PHP PERL 正则匹配中文

    2013-04-16 12:02:29
    PHP 正则匹配中文 gb2312: $pattern="/^[".chr(0xa1)."-".chr(0xff)."]+$/m"; utf-8: $pattern="/^[\x{4e00}-\x{9fa5}]+$/u";
  • .*? 匹配一行内任意字符 (\r\n\s*?.*?) 匹配整行 {0,10} 匹配0-10个整行
  • 14. Perl 正则表达式-正则匹配

    千次阅读 2019-08-27 16:04:41
    1. 正则匹配语法 Perl 的正则表达式语法非常灵活, 可以借助于内置变量$_ 进行简化, 也可以借助于m符号来自定义匹配定界符. 1.1 简写方式 简写模式使用内置变量$_与模式进行匹配. 标准模式无须...
  • Perl 正则表达式正则表达式(regular expression)描述了一种字符串匹配的模式,可以用来检查一个串是否含有某种子串、将匹配的子串做替换或者从某个串中取出符合某个条件的子串等。Perl语言的正则表达式功能非常强大...
  • Perl语言的正则表达式基本上是所有常用语言中最强大的,很多语言的正则表达式都参考Perl正则表达式。正则基础知识元字符(Metacharacters) . 匹配任意一个字符,n除外;* 匹配0个或多个任意字符;+ 匹配前面那个...
  • perl正则表达式匹配

    千次阅读 2013-02-05 09:13:27
    所谓Perl正则表达式,就是一串特别设计过的字符串,可以按照你的意图用匹配操作寻找你要求的目标。我这里不是Perl手册,也不是教科书,所以我从例子开始,具体的完整说明还请查手册。 1.1转义符号\ 前面说过...
  • 本人小白看不懂前辈写的perl正则表达式 m/=$/ 和 m/[=]/区别,这个要匹配的是哪两种情况
  • 下面这个例子展示在IC验证中怎么利用perl正则表达式做匹配提取。在IC验证中会写大量的task/function,对很复杂的系统进行仿真的时候,会大量调用task/function,如果能够在进出task/function的时候在log中打印出...
  • perl正则表达式匹配中文:/[^u4E00-u9FA5]/ js中正则表达式匹配中文:match(/[\u4E00-\u9FA5]/)
  • 目录欢迎微信随缘关注@pythonic生物人1、正则基础知识 元字符(Metacharacters)字符集反斜线字符单词相关字符锚定分组捕获和反向引用特殊符号存储匹配内容 2、正则表达式使用之匹配3、正则表达式使用之替换正则...
  • perl 正则匹配

    2015-11-26 20:51:25
    if ($_ =~ /.*\s+"(POST|GET)\s*(.*?)\s*HTTP.*?(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})$/) 10.252.142.174 - - [26/Nov/2015:20:28:02 +0800] "POST /api/register/device/detail ...匹配POST 或者GET
  • ^a 以a 为开头[^a] 非aapple(|\t+)pear 中间出现一次以上空格,制表符或者两者混合的字符串apple(+|\t+)pear 中间的分隔符全是空格或者全部制表符(apple|pear)[a|b][ab] 只匹配字符集中列出的任何一个[^def] 匹配...
  • Perl正则表达式匹配

    2013-04-01 22:45:00
    \w+([-+.]\w+)*@((aa.com)|(bb.com)|(163.com)) 这个正则表达式可实现匹配含有aa.com或bb.com或163.com 的email 转载于:https://www.cnblogs.com/inbase/archive/2013/04/01/2994479.html...
  • 1. 匹配单个字符通过re模块能够完成使用正则表达式来匹配字符串代码功能.匹配任意1个字符(除了)[ ]匹配[ ]中列举的字符d匹配数字,即0-9D匹配非数字,即不是数字s匹配空白,即 空格,tab键S匹配非空白w匹配非特殊...
  • Perl正则表达式

    2015-02-15 14:39:19
    =~Perl正则表达式匹配运算符,左边是待匹配字符串,右边是Perl正则表达式,匹配结果设置在$1,$2等变量中,在scaler上下文中,成功匹配返回匹配个数,否则返回false。例如$var=~/foo/; !~Perl正则表达式匹配运算符,...
  • 借助 perl 完成,自然想到构造正则表达式进行匹配计数。目前可以找到的匹配计数方式有好几种: 假定 $string 是需要进行统计的字符串, $regex 是进行匹配正则表达式。 方案一: #method 1: my $count...
  • Perl 常用正则匹配

    千次阅读 2017-07-18 09:14:07
    tr/ / / 替换操作符不支持正则表达式 也不具备双引号替换能力 m/ / s/ / / 都支持正则表达式,...=pattern) 前看声明,如果正则表达式在下一次匹配 pattern 风格,就开始匹配,而且不影响匹配效果.如/\w+(?=\t)/将匹配
  • perl正则表达式就是通过一串特别设计的字符串,可以按照我们的需求匹配、替换、转化目标字符串。本文主要是对一些常用的正则表达以及语法的总结以及举例,供广大喜爱Perl的同学交流学习。操作符:=~ 或 != 分别表示...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 3,402
精华内容 1,360
关键字:

perl正则匹配