• 浅显讲解perl的模式匹配


    perl 接触的还不是很多,就把最近用到的匹配相关整理一下,拿出来分享一下。

    首先介绍也关于perl字符串匹配的两个运算符

    =~ 匹配成功返回true,失败返回false

    !~ 不匹配成功返回true,失败返回false

    for example :

    1 my $testString = "hello world";
    2 if ($testString =~ /hello/) {
    3   print "true\n";
    4 } else {
    5   print "false\n";
    6 }

    匹配的字段需要用/xxx/包含起来,在里面可以放想匹配的字符串或者是正则表达式。

    perl的正则表达式使用传统型NFA引擎 (参考百度百科:http://baike.baidu.com/view/94238.htm?fr=aladdin

    学习正则表达式有一个不错的文章可以推荐:30分钟入门正则表达式

    当然,想30分钟入门似乎还是不够的~

    这篇文章介绍了正则的一些基本语法,30分钟只够记一记,如果平时使用的比较多,慢慢便会熟练运用了。

    使用正则匹配的简单例子:

    1 my $testString = "hello123 world";
    2 if ($testString =~ /(\d{3})/) {
    3   print "$1\n";
    4 } else {
    5   print "false\n";
    6 } 

    \d 指 匹配数字, {3} 指匹配3次。

    需要注意的是\d在有些语言的正则匹配中不支持,这个时侯使用[0-9]能达到同样的效果。

    perl在匹配中用括号括起来的时候,会将匹配到的项分配到一个内存里

    这个时候可以使用$1去表示第一个括号内的数据,然后有多个括号的时候可以采用$2...$3...

    还有 $&, &`, &' 可以用来表示匹配项,匹配的前一部分字符串和匹配的后一部分字符串

    可以再举个例子来看一下:

    1 my $testString = "hello123 world234a";
    2 while ($testString =~ /(\d{3})/g) {
    3   print "$&\n";
    4   print "$`\n";
    5   print "$'\n";
    6 }

    想一下打印出来的数据会是什么?

    在这里例子当中又看到了在模式匹配后面跟了一个g,这玩意叫做模式匹配选项。

    选项 描述
    g 匹配所有可能的模式
    i 忽略大小写
    m 将串视为多行
    o 只赋值一次
    s 将串视为单行
    x 忽略模式中的空白

    其实我也就用用g和i比较多一些~

    既然提到了g,那就需要在提一下匹配中的查找替换操作了。

    比如想要把hello world 中的world 替换成 hello perl 那可以这样写

    1 $testString = "hello world";
    2 $testString =~ s/world/perl/g;
    3 print "$testString\n";

    查找替换的格式就是 string1 =~ s/想要查找的字段/替换的字段/g

    g就表示把所有匹配的字段都替换掉,当然除了s 还可以使用这些

    选项 描述
    c 翻译所有未指定字符
    d 删除所有指定字符
    s 把多个相同的输出字符缩成一个

    不过我就使用了s, 即便是删除我也习惯用 s/查找字段//g 这样的方式替换成空的。

    暂时就先整理这些,有不正确的地方麻烦指出来,谢谢。

  • 相关阅读:
    BZOJ 1050 旅行
    BZOJ 1040 骑士
    BZOJ 1038 瞭望塔
    BZOJ 1037 生日聚会
    BZOJ 1823 满汉全席
    BZOJ 3091 城市旅行
    CF702E Analysis of Pathes in Functional Graph
    Luogu 2154 [SDOI2009]虔诚的墓主人
    Luogu 1268 树的重量
    Luogu 4867 Gty的二逼妹子序列
  • 原文地址:https://www.cnblogs.com/viroyiheng/p/3969819.html
Copyright © 2020-2023  润新知