Arrays und Hashes (Perl oder PHP) in <script> als JS-Object erzeugen

[beatovich]

hallo

Das folgende ist eine funktionierende Implementation um Perl Arrays oder Hashes innerhalb von <script> Elementen als JS Objekte zu erzeugen.

Use Json;

#Beispieldata
my $arrayref=[ "example>1", "example>2", "<>\"'&&" ];
my $hashref= { a=>"example>1", b=>"example>2", c=>"<>\"'&&" };

#Anwendung
print perldata_to_htmlscript_ob( { var1 => $arrayref, var2=> $hashref } );

# Die Funktion
sub perldata_to_htmlscript_ob{
	my $hash_of_objects = shift;
	my $result = '';
	foreach( keys %{ $hash_of_objects } ){
		$result .= "var ". $_." = " .  encode_json( $hash_of_objects->{$_} ) . "\n";
	}
	return sprintf("<script>\n//<!--\n%s\n// -->\n</script>\n",$result);
}

Statt html_escape wird eine Syntax verwendet, die die Interpretation als html abschaltet.

Das lässt sich sehr leicht nach PHP portieren.