Daten mit Config::Tiny einlesen und mit JSON::PP als JSON ausgeben (gelöst) - #146259 (Fragen zu Perl-Modulen)

sitescriptor

2011-03-06 12:38

User since
2009-08-09
105 Artikel
BenutzerIn
[default_avatar]

2011-03-06T10:25:17 renee
Ein anderer Weg wäre natürlich, eine TO_JSON-Methode für das Config::Tiny-Objekt zu schreiben... Ist aber aufwändiger und je nach Anwendungsfall nicht notwendig.

...ich werde mich hüten... :-)

2011-03-06T10:23:54 renee
Da das Objekt von Config::Tiny ja eine Hashreferenz ist, kannst Du es in einen Hash dereferenzieren. Dann übergibst Du an encode einfach die Referenz auf diesen Hash.

In die Richtung hatte ich auch schon gedacht:

Code (perl): (dl )

\%{ $Self->{'tinyobj'}}

Klappt aber so nicht: "--->encountered object...."
Mit Zwischenschritt nach Deinem Beispiel geht es:

Code (perl): (dl )

1
2
3

my $json_obj =  JSON::PP->new();
my %hash = %{$Self->{'tinyobj'}};
$Self->{'json'} =  $json_obj->encode( \%hash );

Wo ist der Unterschied?
Danke Renee!