Guest GAST

[...] das Problem ist, das mein Suchstring nur jeden 2. Dut No ausgibt, d.h. dieser überschreibt bei jedem Finden das Dut No!
Wie kann ich das verhindern?

So sieht meine Suche aus:

Code: (dl )

1
2

(my @array) = $_ =~ /(Dut No.*?)Dut No/gsm;
print @array;

Übrigens ist hier natürlich einfach das Problem, dass Du das zweite Dut No jeweils noch mit matchst und die Regexengine natürlich erst hinter dem letzten Treffer nach dem nächsten sucht. Du kannst das umgehen indem Du einen zero-width positive lookahead verwendest, also zum Beispiel m/(Dut No.*?)(?=Dut No)/gsm schreibst.

Trotzdem bezweifle ich, dass es eine intelligente Idee ist, die Daten zuerst komplett einzulesen, bevor man sie derart zerlegt.