perl – 在qw中保留空白区域

前端之家收集整理的这篇文章主要介绍了perl – 在qw中保留空白区域前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
有没有办法在qw中保留一些空白?例如:

my @a=qw(1234 John Smith 123 Main St.);

生成一个包含6个元素的数组.有没有办法,哦,我不知道……逃离白色空间保留一些吗?就像是:

my @a=qw(1234 John\ Smith 123\ Main\ St.);

返回3个元素:’1234′,’John Smith’,’123 Main St.’?

(仅供参考,我已尝试过以上内容,也有不同的报价组合,但都无济于事)

解决方法

要按换行符分隔:

my @a = split /\n/,<<'END';
1234
John Smith
123 Main St.
END

猜你在找的Perl相关文章