perl一行式程序系列文章：Perl一行式 假如文件file.log内容如下： root x 0 0 root /root /bin/bash daemon x 1 1 daemon /usr/sbin /usr/sbin/nologin bin x 2 2 bin /bin /usr/sbin/nologin sys x 3 3 sys /dev /usr/sbin/nologin sync x 4 65534 sync /bin /b

由于工作需要，需要批量建立网站，修改配置文件。开始时用sed去批量修改的，最后改装成perl了。 #!/usr/bin/perl while(<>){ chomp; @line=split(/\s+/,$_); open FH,"< /home/test/$line[0]/wp-config.php"; my @webfi

\w 表示匹配大小写英文字母、数字以及下划线，等价于'[A-Za-z0-9_]'。\S 表示匹配非空白字符，范围可广了，只要不是空格、换行符、制表符、换页符即可你举的例子看不出区别，但你试试 my $names = "Fred and Bar-ney"; 就看出来