# ################################################################### # Daten abholen lassen my $content = fetch_data( $url ); # Abbruch, wenn Daten nicht geholt werden konnten die "Could not load data from $url." if not defined $content; # Bereite JSON-Parser vor my $json = JSON->new->allow_nonref; # Dekodiere JSON-Daten und erstelle eine Datenstruktur my $array_from_json = $json->decode( $content ); # End System Question #Begin Cgi Code with output html print "Content-type: text/html\n\n"; #print "Content-Type: text/html; Charset=UTF-8\n\n"; print '', "\n"; print '', "\n"; print '', "\n"; print "";