@vars = $var1,$var2,$var3; 
undef $";
$string = "@vars";