Select Code to Download

# Code that builds the structure
while ( my $line = <DATA> ) {
...
        };
    }
}

# Resulting Data structure output
'111_DDD,' => {
...

              ...etc...

#MYSQL TABLE
BS       queue_name   in_q_per in_q_num  out_q_per out_q_num
...
222_DDD  BBB_BB1_DDD    0%        0          0%         0
333_DDD  CCC_CC1_DDD    0%        0          0%         0
333_DDD  CCC_CC1_DDD    0%        0          0%         0

__DATA INPUT__
AAA_AA1_DDD (0% / 0 of 1024 | event 0% / 0 of 1024)
...
CCC_CC1_DDD (0% / 0 of 1024 | event 0% / 0 of 1024)
CCC_CC2_DDD (0% / 0 of 1024 | event 0% / 0 of 1024)
BS: 333_DDD, QE: QQQ_DDD (additionnal QE)