s/\n//g, s/\s+//g for $var;


##</code><code>##

$var =~ s/\s+//g