Help for this page
sub rd_template { my (%mymsg, %msg48, $msg, $key, $val, $msg48, $key48, $val48); ... my @temp = %msg; # testing to see the hash quickly.. print "@temp\n"; }
MTI=>1100 2=>4000000000000001 3=>003000 ... 48=> 2=>01 02 3=>5555555