Perl: More simplication of srl_dump_data_structure