Thanks for the information. Let me try to explain better.
When you enter the cmd "debug isdn verbose", the Adtran starts returning data.
WilliamsFudge904#debug isdn verbose
WilliamsFudge904#
11:46:18:576 ISDN.RES_MGR Reserving an outbound channel.
11:46:18:577 ISDN.RES_MGR ISDN Channel reserved.
11:46:18 ISDN.CC_MSG PRI 1 Host>>CC: 00 c633 SETUP_REQ
11:46:18 ISDN.CC_IE PRI 1 ie: 00 04 0A 80 80 80 90 00 00 00 00 00 82
11:46:18 ISDN.CC_IE PRI 1 ie: 00 6C 0E 80 80 80 80 33 33 34 37 30 33 36 33 35 37
11:46:18 ISDN.CC_IE PRI 1 ie: 00 70 0C 80 80 38 30 33 33 36 36 31 36 36 33
11:46:18 ISDN.CC_IE PRI 1 Qie: 1C 0E 9F 8B 01 00 A1 08 02 01 01 02 01 00 84 00
11:46:18 ISDN.L2_MSG PRI 1 Sent = 02 01 D6 4E 08 02 46 34 05 04 03 80 90 A2 18 03
11:46:18 ISDN.L2_MSG PRI 1 A1 83 85 1C 0E 9F 8B 01 00 A1 08 02 01 01 02 01
11:46:18 ISDN.L2_MSG PRI 1 00 84 00 6C 0C 00 80 33 33 34 37 30 33 36 33 35
11:46:18 ISDN.L2_MSG PRI 1 37 70 0B 80 38 30 33 33 36 36 31 36 36 33

I need to send this data to a file.
Here is the part of the code where I try to gather the information and send it to the file.

my @output = $t->cmd(String => "debug isdn verbose");
  foreach my $line (@output){
  printf ADTRANLOGINFO "%s \n",$line;
  }
[download]