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