Select Code to Download

 push @responsetextall, @responsetext;

 for my $j (0..$#{$responsetextall[$i]}) {

  run_api_call($urlstringapp);
  @responsetext = parse_json ($client->responseContent());
...
              my $responseid = $responsetextall[$i][$j]{id};
           my $responsests = $responsetextall[$i][$j]{status};
           #$responselastlogin = $responsetextall[$i][$j]{lastLogin};