mehrere hashes übergeben an Sub - #193077 (Allgemeines zu Perl)

bianca

2021-01-05 09:47

User since
2009-09-13
7016 articles
BenutzerIn

user image

Warum übergibst du sie nicht so wie sie sind mit my $pdf_file = create_pdf_v3(\%beleg_art,\%adresse);?
In der sub z. B.:

Code (perl): (dl )

sub create_pdf_v3 {
  my ($ba,$adr) = @_; # jetzt gibt es %$ba und %$adr, echte Referenzen auf die Hashes
  # Beispiel Iteration:
  foreach my $ober (keys %$ba) {
    foreach my $unter (keys %{$ba->{$ober}}) {
      print "ich bin eine Referenz: ".$ba->{$ober}{$unter};
    }
  }
}

Editiert von bianca: Beispiel ergänzt
Last edited: 2021-01-05 09:51:51 +0100 (CET)

10 print "Hallo"
20 goto 10