map {
    if ( $_ =~ m/Keep:\s*(\d+)\s*(Phase|offset):\s*([xabcdef\d]+)\s*Strength:\s*(\d+)/ ) {
        print "Keep:${1} - ${2}:${3} - Strength:${4}\n";
    }
} split /\r\n|\n/, $line;