使用 use re debug 查看正则表达式的匹配过程
程序员文章站
2022-10-08 09:47:36
复制代码 代码如下:#!/usr/bin/perluse strict;use warnings;use re 'debug';sub test { ...
复制代码 代码如下:
#!/usr/bin/perl
use strict;
use warnings;
use re 'debug';
sub test {
my $str = "123456789";
print join(":", split /(?<=...)/, $str);
}
test();
上一篇： Perl 哈希的创建和引用介绍
下一篇： Python中一些不为人知的基础技巧总结