Thread 2 Arrays abwechselnd miteinander "verbinden"
(12 answers)
Opened by Ensretted at 2008-07-23 17:09
Hallo Perl-Gemeinde,
da ich absoluter Perl-Newbie bin (hab mich gerade abgemeldet, also bin ich der "Neue" ;-) ), ich durch die SuFu nix gefunden hab, stelle ich hier mal meine Frage (Problemstellung) vor - vlt. kann ja einer von euch mir weiterhelfen. Im Voraus schon mal besten, vielen Dank für eure Zeit und eure Lsgs.vorschläge. Euer Ens Also...es existiert ein Textfile, welches ich so einlese: # open file open(INFILE, "test.txt") or die "Kann Input-Datei nicht öffnen: $!"; # read data and store it into an array my @lines = <INFILE>; # close file close INFILE; Dieses Array filtere ich nach speziellen Ausdrücken: my @req = grep { /BAPI_RSLT_REQ_ISOMSG/ } @lines; #find all requests my @resp = grep { /BAPI_RSLT_RESP_ISOMSG/ } @lines; #find all responses Nun habe ich 2 Arrays, welche eine identische Anzahl von Elementen haben. (das ist sicher!) Frage1: wie kann ich nun die beiden Arrays ala newArray[0] = req[0] . '***' . resp[0] "verbinden", ohne! eine Schleife benutzen zu müssen (wenns denn überhaupt geht)? Obige Zeile gilt ja nur für ein Element und mit 'for each' kenne ich den Index nicht, über welchen ich auf die Arrays zugreifen müsste. => nur eine einfache for-schleife verwendbar? Alternativen: 1. Mit Hashes geht nicht, da doppelte Einträge vorkommen. 2. Push hat m.W. nur einen Parameter zum Anhängen - ich weiß nicht wie das funktionieren könnte? |