$test = qq();
$_ = qq();

$test = $test . $_ while(<DATA>);