复制代码 代码如下:
#!/usr/bin/perl
use strict;
use warnings;
use re 'debug';
sub test {
my $str = "123456789";
print join(":", split /(?<=...)/, $str);
}
test();
2020-06-11 11:09脚本之家 perl
使用 use re 'debug' 查看正则表达式的匹配过程,参见如下的代码
复制代码 代码如下:
#!/usr/bin/perl
use strict;
use warnings;
use re 'debug';
sub test {
my $str = "123456789";
print join(":", split /(?<=...)/, $str);
}
test();
Perl使用chdir的例子,供朋友们参考学习 ...
perl中尖括号运算符的用途分享,这里简单介绍下,方便需要的朋友 ...
perl有最好的文本数据处理能力.这是大家都知道的.在perl本身有一个别的软件没有的小功能,就是Perl格式.它相当于简单的命令行报表和图表输出 ...
大家有没有碰到过unix上,一个目录文件太多,无法删除的现象,我为大家写了个perl的程序删除...
如果要对使用的lib指定路径,可以使用下面的语法 ...
perl中创建数组时,可以使用到qw。但考虑到英文名称中间的空格等情况就需要单独处理了 ...
Perl的经典用法分享,学习perl的朋友可以参考下 ...
Perl胶水实现前后台对接的方法,有需要的朋友可以参考下 ...