Datei bereichsweise auslesen und in ein array speichern (Allgemeines zu Perl)

[thread]15491[/thread]

Datei bereichsweise auslesen und in ein array speichern

Readers: 23

Articles: hide open all | hide show old branches

+3 replies
guest Sanny

2010-09-29 17:09
Hallo zusammen,

Ich habe folgendes Dateiformat:
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

Sek_1 datei_1.dat value....... ....... datei_2.dat value....... ....... datei_3.dat value....... ....... Sek_2 datei_1.dat value....... ....... datei_2.dat value....... ....... datei_3.dat value....... ....... Sek_n ....
Diese Daten habe ich bereits in ein array @allSec geschrieben, um darauf zugreifen zu können. Um nun auf die Daten der einzelnen Bereiche zugreifen zu können, möchte ich die Daten der Bereiche zwischen datei_1.dat bis datei_3.dat für jede Sek_i in ein weiteres array schreiben.

Ich habe jetzt folgendes Skript geschrieben:
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

while(my $zeile=<@allSec>) { $i=1; if($zeile=~ m/^datei1\.dat/ .. $zeile=~ m/^datei3\.dat/g) { push(@($secData_[$i]),$_); $i++; } } #------------------------------------------------------------------------ #Ausgabe der Daten der n Sektionen (als Test) #------------------------------------------------------------------------ for($j=1; $j<=$i; $j++) { print "Daten der Sektion $j \n"; print @($secData_[$i]); }
# es sollen alle Daten zwischen Sek_1 und Sek_2 , zwischen Sek_2 u. Sek_3 etc. jeweils in ein array geschrieben werden, die Laufvariable $i soll dazu dienen, die einzelnen arrays später identifizieren/ auf sie zugreifen zu können
das Skript läuft jedoch nicht.....

hat jemand eine Idee, woran das liegen könnte? Für Lösungsvorschläge danke ich im voraus.

Gruß

sanny

mod-edit pq: code-tags eingefügt
Last edited: 2010-09-29 18:04:46 +0200 (CEST)
reply with quote
- +2 replies
- payx
  
  2010-09-29 17:36
  
  User since
  2006-05-04
  556 articles
  BenutzerIn
  
  Hallo Sanny,
  
  es wäre einfacher, Dich zu unterstützen, wenn Du richtige Beispieldaten schicken würdest und vor allem, wenn Du das ganze Script schicken würdest. Setze bitte außerdem Deine Code-Beispiele in Code-Tags [code=perl] usw., denn das macht die Sache lesbarer.
  
  Was mir trotzdem auffällt: Den ganzen Dateiinhalt in ein Array zu speichern ist wohl überflüssig, wenn Du das Array anschließend ohnedies zeilenweise abarbeitest.
  
  Und hier: @($secData_[$i]) müssen wohl geschweifte Klammern stehen: @{$secData_[$i]}, wenn Dein AoA wirklich @secData_ heißt.
  
  Eine Frage noch: Warum hast Du nicht den Thread Daten aus einer Datei lesen und in ein Verzeichnis/ Datei speichern fortgeführt, in dem Dir Linuxer eine sehr nützliche Antwort gegeben hat?
  
  Viel Erfolg jedenfalls
  wünscht
  payx
  
  reply with quote
  - pq
    
    2010-09-30 10:06
    
    User since
    2003-08-04
    12201 articles
    Admin1
    
    anscheinend geht es jetzt hier weiter: Daten aus einer Datei lesen und in ein Verzeichnis/ Datei speichern
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
    
    reply with quote

View all threads created 2010-09-29 17:09.