Perl 正则二

发布时间：2020-12-15 23:52:07 所属栏目：大数据来源：网络整理

导读：my $command="cd /tmp";print "$command is $command:n";my $newdir=(split /s+/,"$command")[1]; ---取第2个元素print "$newdir is $newdir:n";[root@jhoa bin]# perl a1.pl $command is cd /tmp:$newdir is /tmp:

my $command="cd /tmp";
print "$command  is $command:n";
my $newdir=(split /s+/,"$command")[1]; ---取第2个元素
print "$newdir is $newdir:n";


[root@jhoa bin]# perl a1.pl 
$command  is cd /tmp:
$newdir is /tmp:

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!