Guten Morgen an alle :)

Also ich will gleich zur sache kommen, ich bin ziemlich neu in der Materie von Perl und es ist eigendlich auch meine erste Programmiersprache und ja ich kenn mich halt noch net wirklich aus und bin auch im I-net nicht fündug geworden, deswegen frage ich mal bei euch nach wenns nicht stört, also ich will aus einem Text
z.B:

5ug1
6 1010 aaaaaaa = "1234" bbbbb
6 2020 bbbbbb = "9876" cccccc
6*End
5ug2
6 1020 aaaaaa = "1234" bbbbbb
6 2030 bbbbbb = "9876" cccccc
6*End

nur den Text von 5ug1 bis 6*End ausgeben und 5ug2 weglassen, dabei kann sich die textlänge in 5ug1 und in 5ug2 ändern, sprich es können mehr oder weniger zeilen sein deswegen kann ich substr nicht verwenden und read kommt auch net in frage hab schon soviel probiert bin aber einfach net dahinter gekommen derzeit hab ich mal das 5ug1 rausgesucht also mit [if(/5ug1/)] und dann weiß ich leider net weiter theoretisch müsste er immer in die nächste zeile springen und abfragen ob das ne 6 is und falls ne 6* kommt müsste er abbrechen und den text den er ausgelesen hat in eine Datei schreiben.

Naja hoffe das das irgendwer kapiert hat was ich meine :) falls wer mehr infos braucht muss er fragen weiß nämlich nicht genau was euch helfen könnte :) na dann danke mal fürs lesen und noch nen schönen tag, bye