print Dumper ( $xst->{cmts}{STBDSG} );

then

print Dumper ( $xst->{cmts} );