my @stack = unpack q{
H2 ### Header Record Id : 1 Byte
H2 ### File Format Version : 1 Byte
H16 ### Timestamp : 8 Bytes
H2 ### No. of BSCs : 1 Byte
   ###     For each BSC ...
A2 ###     BSC Id : 1 Byte
A2 ###     Application Version : 1 Byte
A4 ###     BSC Name : 2 Bytes
A4 ###     Number of Cells : 2 Bytes
   ###         For each Cell ...
A4 ###         Cell Pointer : 2 Bytes
A18 ###         Cell Name : 9 Bytes
A4 ###         Number of Neighbour Cells : 2 Bytes
   ###             For each Neighbour Cell to this BSC ...
A4 ###             Cell Pointer : 2 Bytes
A18 ###             Cell Name : 9 Bytes
}, $rawAsHex;