$var1 =~ $var2 =~ s/\n/<br>/g;