首页 > 编程 > Perl > 正文

使用 use re debug 查看正则表达式的匹配过程

2020-06-04 20:29:49
字体:
来源:转载
供稿:网友
代码如下:
#!/usr/bin/perl
use strict;
use warnings;
use re 'debug';
sub test {
    my $str = "123456789";
    print join(":", split /(?<=...)/, $str);
}
test();
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表