1
2

m/00(\d{3})\.000(\d\d).00(\d{3})\.0000.0000/
  and print "$1$2$3";

Erst denken, dann posten --
27. Deutscher Perl- u. Raku -Workshop (Termin wird noch gesucht) 2025 in München.

Winter is Coming