while (<DATA>) {
    $_ .= <DATA>;
    s/^0\s*(.*)\n\s+(.*\n)/$1 $2/s;
    print;
}