Community  »  Perl: Allgemeines Forum

Array abfragen	Seitenanfang
Ich möchte bei einen 4 Dimensionalen Array das sowohl Buchstaben als auch Zahlen enthält darauf prüfen ob die Felder leer oder voll sind wie könnte ich den $unterricht[$stunde][$tag][$zeile][$eintrag] daruf prüfen ob sie die Felder leer oder voll sind und es dann schließlich ausgeben ? for(my $xstunde=0;$xstunde< 12 ;$tag++) { for(my $xtag=0;$xtag< 5 ;$tag++) { for(my $xzeile=0;$xzeile< 4 ;$zeile++) { for(my $xstunde=0;$xeintrag< 4;$eintrag++) { prüfen von $unterricht[xstunde][xtag][$xzeile][$xeintrag] ob die Felder etwas beinhalten Ausgabe von $unterricht[xstunde][xtag][$xzeile][$xeintrag] } } } } wie kann ich die Prüfung und die Ausgabe machen ? Danke im Voraus Datum: 05.03.2008-10:19
re: Array abfragen	Seitenanfang
#!/usr/bin/perl use strict; use warnings; my @unterricht = (... fülle das Array ...); for my $stunde ( 0..$#unterricht ){ my $ref = $unterricht[$stunde]; for my $tag ( 0..$#{ $ref } ){ my $tagref = $ref->[$tag]; for my $zeile ( 0..$#{ $tagref } ){ my $zeilenref = $tagref->[$zeile]; for my $eintrag ( 0..$#{ $zeilenref } ){ if( defined $zeilenref->[$eintrag] ){ print sprintf "Stunde: %d, Tag: %2d, Zeile: %3d, Eintrag: %s\n", $stunde, $tag, $zeile, $zeilenref->[$eintrag] } } } } } Lesematerial: perldoc -f sprintf perldoc perlreftut perldoc perlsyn (der Teil mit den "For Loops") Datum: 05.03.2008-14:25