use strict;
use warnings;

open(CPROG, "<test1.cpp");
my $concat_line;
while (my $line = <CPROG>) {
    if ($line =~ /\(/s) {
        $concat_line = $line;
    } else {
        $concat_line .= $line if ($concat_line);
    }
    if ($concat_line && ($concat_line =~ /\(.*\)/s)) {
        print $concat_line;
        $concat_line = undef;
    }
}
close(CPROG);

##</code><code>##

#include <string.h>
#include <stdio.h>

main() {
    char a[80];
    strcpy(a,
    "abcd");
    strcat(a,
    "\015");
    printf("%s", a);
}

##</code><code>##

main() {
    strcpy(a,
    "abcd");
    strcat(a,
    "\015");
    printf("%s", a);