JsonList

[softbar]

Bitte ergänzen: für Ausgabe der gets
Ab line 272

    # corresponding get parameters
      $str .= sprintf("%*s\"gets\": [\n", $lev+6, " ");
      my $gets = getAllGets($d);
      if($gets) {
        my @pGets;
        foreach my $get (split(" ", JsonEscape($gets))) {
          push @pGets, sprintf("%*s\"%s\"", $lev+8, " ", $get);
        }
        $str .= join(",\n", @pGets);
      }
      $str .= sprintf("\n%*s],\n", $lev+6, " ");


Danke