perl + 匹配前导模式一次或者多次
来源：互联网 发布：淘宝自定义属性怎么写 编辑：程序博客网 时间：2024/04/29 21:45
Vsftp:/data01/mysqllog/binlog# cat a2.pl$_="aaaa@[2]sasas";if ($_ =~/.*?(\@\[[0-9]+\]).*/){print "\$id is $1\n"};Vsftp:/data01/mysqllog/binlog# perl a2.pl$id is @[2]Vsftp:/data01/mysqllog/binlog# cat a2.pl$_="aaaa@[23]sasas";if ($_ =~/.*?(\@\[[0-9]+\]).*/){print "\$id is $1\n"};Vsftp:/data01/mysqllog/binlog# perl a2.pl$id is @[23]d+ 匹配多个数字字符串，和 [0-9]+ 语法一样 +匹配前导模式一次或多次[oracle@oadb test]$ cat a3.pl $_="aaaa@[3]sasas";if ($_ =~/.*?(\@\[[0-9]{1,3}\]).*/){print "\$id is $1\n"};[oracle@oadb test]$ perl a3.pl $id is @[3][oracle@oadb test]$ cat a3.pl $_="aaaa@[30]sasas";if ($_ =~/.*?(\@\[[0-9]{1,3}\]).*/){print "\$id is $1\n"};[oracle@oadb test]$ perl a3.pl $id is @[30][oracle@oadb test]$ cat a3.pl $_="aaaa@[301]sasas";if ($_ =~/.*?(\@\[[0-9]{1,3}\]).*/){print "\$id is $1\n"};[oracle@oadb test]$ perl a3.pl $id is @[301][oracle@oadb test]$ cat a3.pl $_="aaaa@[3012]sasas";if ($_ =~/.*?(\@\[[0-9]{1,3}\]).*/){print "\$id is $1\n"};[oracle@oadb test]$ perl a3.pl [oracle@oadb test]$ [0-9]{1,3} 匹配1到3次{m} 匹配刚好是 m 个 的指定字符串 {m,n} 匹配在 m个 以上 n个 以下 的指定字符串 {m,} 匹配 m个 以上 的指定字符串
0 0
