如何解析perl中的字符串以提取某些值？

Question

我有以下字符串

> show box detail
   2 boxes:
1) Box ID: 1
   IP:                  127.0.0.1
   Interface:           1/1
   Priority:            31
2) Box ID: 2
   IP:                  192.68.1.1
   Interface:           1/2
   Priority:            31

如何在perl中从上面的字符串中获取BOX ID？ 这里的盒子数量可以变化。那么基于框“n”的数量，如果显示框细节可以以相同的格式到达n个节点，如何提取框ID？

Answer 1

my @ids = $string =~ /Box ID: ([0-9]+)/g;

限制性更强：

my @ids = $string =~ /^[0-9]+\) Box ID: ([0-9]+)$/mg;