The info looks like this, and I want to extract 2W36164K and write it to another file... I am identifying the line using
if ((substr($line,1,12)) eq ("Trunk Group:"))
Trunk Group: 2W36164K CLEAR_CHANNEL_TR
01/05/04 MON 12:00 48 194 1,556
01/09/04 FRI 10:00 48 192 1,560