Perl 中的分割和分布行
我有这种形式的行:
xxx| aaa yyy| bbb ccc zzz| ddd eee
我想用 perl 分割并分布在这个数组中:
xxx| aaa
yyy| bbb
yyy| ccc
zzz| ddd
zzz| eee
I have this form of line:
xxx| aaa yyy| bbb ccc zzz| ddd eee
I want to split and distribute in this array with perl:
xxx| aaa
yyy| bbb
yyy| ccc
zzz| ddd
zzz| eee
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(2)
好的,从评论转来的。我在问题结束时把它放在那里。
使用替换正则表达式,我们迭代字符串,提取键和值。值字符串按空格分割,并与相应的键一起存储在
%hash
中的匿名数组中。代码:
输出:
Ok, transferred from comments. I put it there while the question was closed.
With a substitution regex, we iterate through the string, extracting a key and the values. The value string is split on whitespace, and stored in an anonymous array in
%hash
, with the corresponding key.Code:
Output:
单线解决方案:
用途:
One-liner solution:
usage: