Text in Blöcke unterteilen (Perl/CGI)

[thread]18959[/thread]

Text in Blöcke unterteilen

Tags: perl5 CGI Ähnliche Threads

Leser: 16

Articles: hide open all | hide show old branches

+8 replies
Phinja

2014-03-12 11:13

User since
2014-03-12
2 Artikel
BenutzerIn

Hallo Leute,

ich bin neu hier, da ich dringend Hilfe brauche. Ich habe die SuFu schon genutzt aber leider nichts gefunden. Ich hoffe ihr könnt mir helfen.
Hier mein Problem:

Ich habe eine Textdatei(um die 300 Zeilen). Diese Datei ist sozusagen "unterteilt" in verschiedene Blöcke. Jeder Block beginnt bei mir mit einem #. Hier zum Verständnis mal aufgeführt:

#
Zeile
Zeile
Zeile
Zeile
#
Zeile

Nun zu meiner Frage:
Ich möchte diese Blöcke ab dem "#" in Arrays speichern und in diesen Blöcken nach bestimmten Sachen suchen. Komme leider auf kein Ergebnis. Hoffe ihr könnt mir weiter helfen.
Last edited: 2014-03-12 11:30:56 +0100 (CET)
- Linuxer
  
  2014-03-12 11:44
  
  User since
  2006-01-27
  3890 Artikel
  HausmeisterIn
  
  Hi,
  
  Schema:
  
  - Array-of-Arrays (AoA) verwenden
  - zeilenweise einlesen
  - wenn Zeile '#' entspricht, Zähler hochzählen
  - wenn Zeile Daten enthält, Zeile in AoA an Zählerposition schieben
  
  more (5.9kb)
  
  Doku:
  
  , speziell
  
  edit: Bessere Lösung wird von murphy genannt: siehe msg #174043
  Last edited: 2014-03-12 14:11:47 +0100 (CET)
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- +3 replies
- Raubtier
  
  2014-03-12 11:49
  User since
  2012-05-04
  1075 Artikel
  BenutzerIn
  Einfach an Zeilen, die nur # enthalten, splitten:
  
  Code (perl): (dl )
  
  my @bloecke = do { local $/; split /^#.*\n/m, <$INPUT_DATEI_HANDLE> };
  
  Das .* ggf. weglassen, je nachdem, ob ein Block immer nur mit # beginnt oder auch mal mit "# bla bla bla".
  - +2 replies
  - murphy
    
    2014-03-12 13:58
    
    User since
    2004-07-19
    1776 Artikel
    HausmeisterIn
    
    Oder einfach local $/ = "#\n" setzen, so dass Perl beim Einlesen jeden Block als "Zeile" betrachtet.
    When C++ is your hammer, every problem looks like your thumb.
    - Linuxer
      
      2014-03-12 14:10
      
      User since
      2006-01-27
      3890 Artikel
      HausmeisterIn
      
      *grml* wie blind kann man sein ;-)
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- GwenDragon
  
  2014-03-12 14:00
  
  User since
  2005-01-17
  14748 Artikel
  Admin1
  
  Und wo ist bitte dein Problem im Zusammenhang mit Webprogrammierung? Ich seh' da keinen Zusammenhang. Falsch gepostet?
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +2 replies
- Phinja
  
  2014-03-13 23:52
  
  User since
  2014-03-12
  2 Artikel
  BenutzerIn
  
  Sorry Leute habe mich leider verlesen -> hat nichts mit Webprogrammierung zu tun :D
  
  Leider bin ich trotz eurer Hilfe und vielen Versuchen nicht auf die Lösung gekommen.
  Vielleicht noch zusätzliche Infos:
  Wenn ich ab dem "#" die Zeilen in verschiedene Blöcke unterteilt habe, muss ich mehrere Sachen in dem Block suchen und wiedergeben.
  Zum Verständnis:
  #
  Zeile1
  Zeile2
  Zeile3
  Zeile4
  #
  
  Zeile 3 wiedergeben -> Zeile 1 -> Zeile 2.
  
  Komme leider nicht auf die Lösung :(
  - Raubtier
    
    2014-03-14 00:08
    
    User since
    2012-05-04
    1075 Artikel
    BenutzerIn
    
    Deine Beschreibung ist nicht gut genug, d.h. daraus wird nicht klar, was du genau haben möchtest.

View all threads created 2014-03-12 11:13.