To quote the Beasty Boys, "I like my sugar with coffee & cream". Moving on...

$var3 = "$var1 & $var2";
$var3 = $var1 . " & " . $var2;
$var3 = join ' & ',$var1,$var2;
undef $var3;
$var3 .= $_ for $var1 =~ /./sg,' ','&',' ',split//,$var2;
[download]

The choice of WTDI is up to you =)

   MeowChow                                   
               s aamecha.s a..a\u$&owag.print