
平台论坛博客文库

› 论坛 › 程序设计 › Perl › 求助，文本中取特定行。

求助，文本中取特定行。 [复制链接]

dgww

丰衣足食

论坛徽章:: 0

电梯直达

1楼 [收藏(0)] [报告]

发表于 2011-08-11 16:35 |只看该作者 |倒序浏览

本帖最后由 dgww 于 2011-08-11 16:36 编辑

==== Group 001====
  Title: Haproxy - testadmin
  Username: admin
  Url:    http://1.1.1.1:10243/test-haproxy
  Password: 122233
  Comment:  test-web1

  Title: mysql - testbackup
  Username: testbackup
  Url:
  Password: 123444
  Comment:

  Title: mysql - root
  Username: root
  Url:
  Password: 122223
  Comment:

  Title: server01
  Username: admin
  Url:    1.1.1.1
  Password: 99999
  Comment:  test-web1
==== Group 002====
  Title: mysql - testbackup
  Username: testbackup
  Url:
  Password: 123444
  Comment:

Title: another-server02
  Username: admin
  Url:
  Password: 88888
  Comment:  test-web2

  Title: mysql - root
  Username: root
  Url:
  Password: 122223
  Comment:

  Title: Haproxy - testadmin
  Username: admin
  Url:    http://1.1.1.2:10243/test-haproxy
  Password: 122233
  Comment:  test-web2

.......
.......
.......
.......

文本如上，我需要取出server01的admin密码999999;another-server02的admin密码:88888

文库|博客

x9x9

小富即安

论坛徽章:: 0

2楼 [报告]

发表于 2011-08-11 16:49 |只看该作者

创建个hash of hashs:

%hash= (title的值=>{Username=>'',Url=>‘’, ... }, ....)

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

返回列表

Chinaunix › 论坛 › 程序设计 › Perl › 求助，文本中取特定行。