#!/usr/local/bin/perl5

$count = 0;
$finish = 0;
while ($line = <STDIN>) {
    next if $finish;
    if ($line =~ m/^Multi-EngineMT/ and $count == 0) {
	$count++;
	next;
    }
    if ($line =~ m/^\s*$/) {
	$newline++;
	if ($newline == 2) {
	    $finish = 1;
	}
	$count++;
	next;
    } else {
	$newline = 0;
    }

    $line =~ s/^\s*\(loading\)\s*//;

    $line =~ s/\"\"\"/\"\\\"\"/g;
    print $line;
    $count++;
}
