请问一下这个正则表达式怎么写啊？

大家好，正式表达式只了解一点最简单的，最近遇到个问题不知道该如何匹配。

要处理的数据格式如下（横线中的两行）：
________________________________
AB: version[2010-03-13 09:11:11] STI[1198],STU[1185],UTS[1184],SSTS[2],STSS[0],UTL[1184],MSSN[7006],MSVN[17242],CVSN[1214]
CD: HCSM_CS[0],HCSM_CMS[0],HCSM_CMUS[0],HCP_CS[0],HCP_CMS[0],HCP_CMUS[6],RACP_CS[0],RACP_CMS[0],RACP_CMUS[0]SAFE_MAXNUM[0]SAFE_CURRNUM[0][30]
_________________________________

需要把 方括号中的各个数据取出来，如 STU[1185] 中的 1185，请问该如何用perl的正则来提取哈？

先谢谢啦

本帖最后由 jason680 于 2011-04-22 14:47 编辑

如果都是数字....
while(m/\[(\d+)\]/g){
  print "$1\n";   
}

如果不一定...
while(m/\[([^\]]+)\]/g){

谢谢 jason 兄，我try 一下