while (<$FILE>) {
    chomp;
    $var .= $_;
}

##</code><code>##

$var = join '', map {chomp; $_} <$FILE>;