Help for this page
%responce_array1 = (); %responce_array2 = (); ... $temp = $dec_json_obj->{0}; $dec_json_obj = &get_hash_to_str($temp); print $temp= $dec_json_obj->{ItemName};
my ( %response1, %response2 ); $response1{REQUEST}{Items}[0]{ItemName} = 'demoName0'; ... $temp = $dec_json_obj->[0]; $dec_json_obj = get_hash_to_str($temp); print $temp = $dec_json_obj->{ItemName};