Eine Zeile aus 2-dimensionalen Array auslesen - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von Christian (68 Beiträge) am Donnerstag, 21.März.2002, 22:40.
    Eine Zeile aus 2-dimensionalen Array auslesen

      Hallo,
      jetzt hätte ich mal ne Frage für alle Perl-Experten:
      wie kann man elegant eine "Zeile" aus einem 2-dimensionalen Array auslesen?
      Hier ein Beispiel welches so ähnlich in PHP prima funktioniert aber nicht in Perl.

      $test["Heinz Becker"]["Pilot"] = "Ja";
      $test["Herbert Müller"]["Pilot"] = "Nein";
      $test["Heinz Becker"]["Seefahrer"] = "Nein";
      $test["Herbert Müller"]["Seefahrer"] = "Ja";
      $a = "Herbert Müller";
      %list = $test[$a];
      while (($key,$value)= each(%list)){
      out " Ist $a $key ?  Antwort: $value<br>";
      }
      

      Es soll halt folgende Ausgabe erscheinen:
      Ist Herbert Müller Pilot? Antwort: Nein
      Ist Herbert Müller Seefahrer? Antwort: Ja

      Vielleicht kann mir ja jemand weiterhelfen?
      Gruß Christian


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Christian (68 Beiträge) am Donnerstag, 21.März.2002, 22:40.
    Eine Zeile aus 2-dimensionalen Array auslesen

      Hallo,
      jetzt hätte ich mal ne Frage für alle Perl-Experten:
      wie kann man elegant eine "Zeile" aus einem 2-dimensionalen Array auslesen?
      Hier ein Beispiel welches so ähnlich in PHP prima funktioniert aber nicht in Perl.

      $test["Heinz Becker"]["Pilot"] = "Ja";
      $test["Herbert Müller"]["Pilot"] = "Nein";
      $test["Heinz Becker"]["Seefahrer"] = "Nein";
      $test["Herbert Müller"]["Seefahrer"] = "Ja";
      $a = "Herbert Müller";
      %list = $test[$a];
      while (($key,$value)= each(%list)){
      out " Ist $a $key ?  Antwort: $value<br>";
      }
      

      Es soll halt folgende Ausgabe erscheinen:
      Ist Herbert Müller Pilot? Antwort: Nein
      Ist Herbert Müller Seefahrer? Antwort: Ja

      Vielleicht kann mir ja jemand weiterhelfen?
      Gruß Christian

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Freitag, 22.März.2002, 12:38.
    Re: Eine Zeile aus 2-dimensionalen Array auslesen

      In Perl sieht das alles ein bisschen anders aus: Perl unterscheidet zwischen Arrays -mit Zahlen indiziert $var[...]- und Hashes -mit Texten indiziert: $var{...}-. So müsste es dann aussehen:

      $test{"Heinz Becker"}{"Pilot"} = "Ja";
      $test{"Herbert Müller"}{"Pilot"} = "Nein";
      $test{"Heinz Becker"}{"Seefahrer"} = "Nein";
      $test{"Herbert Müller"}{"Seefahrer"} = "Ja";
      $a = "Herbert Müller";
      

      %list=$test{$a};
      ...rest müsste eigentlich gehen...

      nich getestet! ;-)

      Das Ganze würde man in Perl aber vielleicht anders schreiben:

      %test=
      (
       "Heinz Becker" =>
       {
        "Pilot" => "Ja",
        "Seefahrer" => "Nein"
       },
      

       "Herbert Müller" =>
       {
        "Pilot" => "Nein",
        "Seefahrer" => "Ja"
       },
      

      );

     Antworten

    Beitrag von Christian (68 Beiträge) am Freitag, 22.März.2002, 13:20.
    Re: Eine Zeile aus 2-dimensionalen Array auslesen

      Hmm danke,
      funktioniert aber leider auch nicht.
      Es wird immer nur ein Verweis wie HASH(0x8619bb4) (vorher ARRAY(0x8619bb4) ) ausgegeben. Die Zuweisung %list=$test{$a}; scheint so nicht zu klappen.

      Gruß Christian

     Antworten

    Beitrag von Christoph Bergmann (8110 Beiträge) am Freitag, 22.März.2002, 16:36.
    Re: Eine Zeile aus 2-dimensionalen Array auslesen

      Stimmt, is logisch ;-)

      Ok, dann vielleicht so:

      $list = $test{$a};
      while (($key,$value)= each(%$list)){
      
      ...

      ;-)

     Antworten


     
 Liste der Einträge von 48900 bis 49050:Einklappen Zur Eingabe 
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < Zur Eingabe  > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge


Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.08s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!