Thread Perl und JSON (2 answers)
Opened by panni at 2012-02-15 16:36

panni
 2012-02-15 16:36
#156137 #156137
User since
2012-02-15
23 Artikel
BenutzerIn
[default_avatar]
Hallo!

Ich muß mich aktuell damit beschäftigen Perl und JSON unter einen Hut zu bekommen. Was ich aktuell aber nicht schaffe :(

Installiert habe ich JSON::XS.

Was ich machen will: ich habe in einer Datenbanktabelle Einträge, die ich auslese und in ein JSON-Objekt bringen muß.

Das JSON-Objekt soll am Ende so aussehen:
Code: (dl )
1
2
3
4
5
6
7
8
9
{
"aktionsID": 444,
"buecher": [
{ "autor": "autorenname1", "titel": "buchtitel1", "seitenanzahl": 400},
{ "autor": "autorenname2", "titel": "buchtitel2", "seitenanzahl": 500},
{ "autor": "autorenname3", "titel": "buchtitel3", "seitenanzahl": 600}
],
"datum": "15.2.2012"
}


Alles was "buecher" betrifft, kommt aus der Datenbank. "aktionsID" und "datum" werden anderweitig bestimmt.

Ich hab nun keine Ahnung, wie ich das aufbauen muß. Ich habe mich versucht, alles was "buecher" betrifft in ein @buecherArray zu schreiben. Das geht und wenn ich das mit
Code (perl): (dl )
print encode_json \@buecherArray ;

ausgebe, sieht das auch ein wenig so aus, wie ich es haben will.
Aber nicht ganz, so fehlt mir, dass das in "buecher": [] geklammert ist.

Und wie ich die "aktionsID" und das "datum" in das JSON-Objekt reinbekomme, weiss ich auch nicht.

Gibt es evtl. irgendwo eine gutes, deutschsprachiges Tutorial dazu?
Last edited: 2012-02-15 16:38:36 +0100 (CET)

View full thread Perl und JSON