perl关于qw以空格为分隔符的问题以及若干替代方案+学会变通+spli
发布时间:2020-12-15 21:04:18 所属栏目:大数据 来源:网络整理
导读:我们在创建数组的时候,可以使用到qw,这是一个非常方便的简写,省去了我们书写大量引号的麻烦。 但是有这样一个问题。如果们要创建有20个人名组成的数组,并且每个人的名字是这种形式的"Join smith" "Harry Potter"也就是每一个名字既包含姓也包含名。这样的
我们在创建数组的时候,可以使用到qw,这是一个非常方便的简写,省去了我们书写大量引号的麻烦。 但是有这样一个问题。如果们要创建有20个人名组成的数组,并且每个人的名字是这种形式的"Join smith" "Harry Potter"也就是每一个名字既包含姓也包含名。这样的话,我们的qw就不能起作用了。因为qw是用空格作为分隔符。我们只能想一些替代的方案来解决。 方案一:用最原始的方案,也就是双引号,来进行数组的创建 @names=("Join smith","Harry Potter"); print @names[0];结果如下: F:&;perlb.pl Join smith F:&; 方案二: 我们可以进行一下简单的变通,qw只能以空格为分隔符,那我们把人名中间的空格用其他的字符进行替代。 @names=qw/Join_smith Harry_Potter/; #然后当我们输出的时候我们再把中间的连接符进行替换 @names[0]=~s/_/ /g; print @names[0]; 结果如下; F:&;perlb.pl Join smith F:&; 方案三: 利用split函数进行创建。 #首先我们定义一个变量 $names="Join smith,Harry potter",#这里利用split函数,这里split//两个斜线之间就是你要分割的地方,本例中以逗号为分割界限 my @names=split/,/,$names; print @names[0]; 结果如下: F:&;perlb.pl Join smith F:&;可能大家还都有更好的方法,希望大家能够留言,然后进行更新。 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |