Thread Array of hashs (20 answers)
Opened by roli at 2005-03-02 23:06

roli
 2005-03-02 23:06
#52248 #52248
User since
2004-12-31
424 Artikel
BenutzerIn
[default_avatar]
Hi,

ich bin (im Moment) daran gescheitert ein Array das aus Hashs besteht auszugeben. Mein Array sieht wie folgt aus:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
JobNo: 1
 input_typ => Integer
 input_comment => Hier bitte einen Integer eingeben
 comment => Dies ist ein Kommentar
 job_template => show_dir
 input_name => Variablenname
 job_name => Directory anzeigen

JobNo: 2
 job_template => show_time
 job_name => Serverzeit anzeigen

JobNo: 3
 job_template => show_server_info
 job_name => Info's über den Server anzeigen

JobNo: 4
 job_template => print_const_str
 job_name => Konstanten String ausgeben

JobNo ist der array index.
Meine Subroutine sieht wie folgt aus:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
sub print_array_with_inner_hash
{
print "Subroutine print_array_with_inner_hash\n";
 my @array2print = @_;
 my $result;
 my $field;
 
 foreach $ref_zeile (@array2print)
 {
   print "Zeile: $ref_zeile()";
   foreach $key (keys %$ref_zeile)
   {
print "Inner hash\n";
     if(defined $ref_zeile{$key})
     {
       print "  $key => $ref_zeile{$key}\n";
     }
   }
   print "\n";
 }
}

Wenn ich "print_array_with_inner_hash(@jobconf);" aufrufe, erhalte ich folgenden Output:
Code: (dl )
1
2
3
4
5
6
Subroutine print_array_with_inner_hash
Zeile: ()
Zeile: 5/8()
Zeile: 5/8()
Zeile: 5/8()
Zeile: 5/8()


Da alles googeln nicht geholfen hat, hoffe ich jetzt auf euch.

Schon mal Danke

Roland
Roland
--
"Steh vorn, während du fragst;
sitzen soll, wer antwortet."
Aus "Die Edda des Snorri Sturluson" "Gylfis Täuschung" Strophe 2

View full thread Array of hashs