Perl - Regulärer Ausdruck

[Norbert Kölln]

Moin, moin!

Wie wäre es mit dieser (ungetesteten) Lösung?
(/(^Thread)\s(.*)\s(\d{2}).(\d{2}).(\d{4}) (\d{2}):(\d{2}),(\d{2}) (Start): ([A-Za-z]{1,40}) (AA):(\d{3})\d*  (SGNR):(\d{2}) (.*)$/))

Die ersten 3 Ziffern der angesprochenen Zahl stehen dann in $12, weitere (egal wie viele) werden ignoriert.

Alles klar?

Norbert