\s 代表空格
+ 代表重复一次或一次以上
\s+ 代表一个或者一个以上空格
[oracle@jhoa ~]$ cat a3.pl
$command ="ls -ltr";
my ($binary,$var)=split /\s+/,"$command";
print "\$bibary is $binary\n";
print "\$var is $var\n";
[oracle@jhoa ~]$ perl a3.pl
$bibary is ls
$var is -ltr
#####################################################
正则表达式
m#[|&><;]#
if ($command =~ m#[|&><;]#) {
m/<regexp>;/ 可以简写成/<regexp>;/ 略去m
[oracle@jhoa ~]$ cat a4.pl
$command = ";";
if ($command =~ m#[|&><;]#) {
print "ok\n";
}
[oracle@jhoa ~]$ perl a4.pl
ok
[oracle@jhoa ~]$ cat a4.pl
$command = "&";
if ($command =~ m#[|&><;]#) {
p
perl 正则
最新推荐文章于 2023-10-23 16:54:10 发布
![](https://img-home.csdnimg.cn/images/20240711042549.png)