Opened by Der aus dem Westen ... at 2012-03-25 14:53
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
mach mal folgendes:
und aus $mapping{$tag} machst du jeweils $mapping->{$tag}
es gibt gar keinen grund, die hashreferenz zu dereferenzieren.
arbeite einfach direkt mit der referenz.
das problem ist:
my(%mapping,$xml)=(%{$_[0]},'');
hier wird dem hash %mapping alles zugewiesen, auch der leere string, und $xml geht dann leer aus. und daher kommen die fehlermeldungen (%mapping hat dann einen leeren string als key und undef als value).
es wäre übrigens nett gewesen, wenn du die fehlermeldungen hier gepostet hättest. sind ja nicht geheim oder so.
Last edited: 2012-03-25 16:01:25 +0200 (CEST)
Code (perl): (dl
)
1 2 3 4 5
sub generate_xml { my ($mapping) = @_; my $xml = ''; foreach my $tag (sort keys %$mapping) {
und aus $mapping{$tag} machst du jeweils $mapping->{$tag}
es gibt gar keinen grund, die hashreferenz zu dereferenzieren.
arbeite einfach direkt mit der referenz.
das problem ist:
my(%mapping,$xml)=(%{$_[0]},'');
hier wird dem hash %mapping alles zugewiesen, auch der leere string, und $xml geht dann leer aus. und daher kommen die fehlermeldungen (%mapping hat dann einen leeren string als key und undef als value).
es wäre übrigens nett gewesen, wenn du die fehlermeldungen hier gepostet hättest. sind ja nicht geheim oder so.
Last edited: 2012-03-25 16:01:25 +0200 (CEST)
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem