[Debug] Current Configuration is Mode = X Points = Y Strategy = Z Threads = W
** Etwas
** was nicht
** mit [Debug] beginnt
[Debug] Timer: T1 Duration: ##.#####s
[Debug] Timer: T2 Duration: ##.#####s

<Suites>
    <Suite>
        <Context>
             <Parameter Name="Mode" Value="X" />
             <Parameter Name="Points" Value="Y" />
             <Parameter Name="Strategy" Value="Z" />
             <Parameter Name="Threads" Value="W" />
        </Context>
        <Pass>
             <Timer Name="T1" Duration="##.#####" />
             <Timer Name="T2" Duration="##.#####" />
        </Pass>
        ...
        <Pass>
             <Timer Name="T1" Duration="##.#####" />
             <Timer Name="T2" Duration="##.#####" />
        </Pass>
    </Suite>
</Suites>

#!/usr/bin/perl -w

use strict;
use warnings;

while (<>) {
  next unless /^\[Debug\]/;
  chomp;
  s/^\[Debug\]\s*//;
  if (/^Current Configuration/) {
    my @pairs = /\S+\s*=\s*\S+/g;
    foreach (@pairs) {
      my ($key, $value) = split /\s*=\s*/;
      print "<Parameter Name=\"$key\" Value=\"$value\" />\n";
    }
  }
  elsif (/^Timer:/) {
    my ($timer, $duration) = /Timer: (\S+).+Duration: (\S+)s/;
    print "<Timer Name=\"$timer\" Duration=\"$duration\" />\n";
  }
}