小弟是Perl 新手 由于工作需要，才开始学习perl 目前预到两个问题
1.撷取文字党片段到一阵列
Ex: 文字档(map.txt)如下
Jack
AA_map 1
BB_map 1
CC_map 0
Michael
AA_map 0
CC_map 0
DD_map 1
Ruby
DD_map 1
EE_map 0
.
.
请问小弟该如何文字档中的Michael至Ruby中间的三行取出，[email protected]/*