Of course, there's also:

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

and

undef $";
$string = "@{ [ $var1, $var2, $var3 ] }";
[download]

which might also be appropriate :P