Hi !

The problem is the way you fill @radio_loop.
This should work:

foreach $key ( sort keys %rpt_tbl )
              {
                    push(@radio_loop, {rpt_no => $key, rpt_descr => $r
+pt_tbl{$key}});
              }
[download]

---- amphiplex