$_ ||= '' for $var1, $var2, $var3;    
print "var1=$var1 -- var2=$var2 -- var3=$var3\n";