ak_smile
2018-09-25 13:44perl新手求教文本处理?
文本1:
stpg
pass: 10
fail: 20
xtpg
pass: 30
fail: 40
文本2:
stpg
pass: 50
stpg
fail: 60
xtpg
pass: 70
xtpg
fail: 80
要求输出为
stpg
pass: 60 ##60=10+50
stpg
fail: 80 ##80=20+60
xtpg
pass: 100 ##100=30+70
xtpg
fail: 120 ##120=40+80
注:##后面的是为了看清规则,不用输出
输出的格式与文本1类似也可以
求教各位大神该怎么写啊
- 点赞
- 回答
- 收藏
- 复制链接分享
0条回答
为你推荐
- 解析regexp时出错:Perl语法无效或不受支持:`(?!
- regex
- 1个回答
- Perl php脚本自动安装?
- perl
- php
- 3个回答
- perl将文本中的日期和数字替换
- 正则表达式
- perl
- 2个回答
- 如何从 Perl 输出 UTF-8?
- perl
- unicode
- utf-8
- 0个回答
- 如何检查 Perl 中是否存在文件?
- perl
- 0个回答
换一换