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);