my $var;
$var = 0;
$var = $var || 30;
print "1. var=$var\n";
$var = 0;
$var ||= 30;
print "2. var=$var\n";