Mi 20.10.1985

Hallo Welt

Das ist mein erster Eintrag.



Di 30.10.1995

Irgendwann dazwischen

Hier haben wir noch einiges vor uns. Wir versuchen einmal, vor dem Ende auch noch was weiterzubringen.
Wenn das klappt, sind wir froh, denn awk hat uns gerettet. So kann es gehen!

Aber wenn es nicht geht, ist es auch schoen warm.


Blah Blah. Letzte Zeile des mittleren Eintrags. Danach mehr als drei Leerzeilen.








Di 30.11.2025

Ende der Welt

Das ist mein letzter Eintrag.

#!/usr/bin/awk -f


BEGIN {
 ARGV[0]=""
  for (k in ARGV) {
    begriff=ARGV[k]
    ARGV[k]=""
    if(begriff != "") {
      suchbegriffe[begriff]=1
      funde_benoetigt++
    }
  }
}

/^$/ {
  leerzeilen++
  if(leerzeilen == 3) {
    tagebuch[eintrag_index] = eintrag_text
    eintrag_text = ""
  }
}

# Beginn eines Eintrags
/(Mo|Di|Mi|Do|Fr|Sa|So) [0-9][0-9]\.[0-9][0-9]\.[0-9][0-9][0-9][0-9]/ {
  leerzeilen=0
  eintrag_index=$2
}

# Alles andere an Text
/.+/ {
  leerzeilen=0
  eintrag_text = eintrag_text "\n" $0
}

END {
  tagebuch[eintrag_index] = eintrag_text
  for (idx in tagebuch) {
    seiten_insg++
    funde_pro_eintrag=0
    for (bgr in suchbegriffe) {
      if(tagebuch[idx] ~ bgr) {
        funde_pro_eintrag++
      }
    }
    if(funde_pro_eintrag == funde_benoetigt) {
      gefundene_seiten++
      print "-[START]----[" idx "]-"
      print tagebuch[idx]
      print "-[ENDE]----------------"
      print ""
    }
  }
  printf("Suche beendet. %d von %d Seiten (~%.0f%%) waren Treffer.\n",
         gefundene_seiten, seiten_insg, (100 * gefundene_seiten / seiten_insg))
}

./tagebuchparser.awk < tagebuch.txt Welt Ende

./tagebuchparser.awk < tagebuch.txt mein erster Eintrag