$bar ||= (1,2,'x');
print $bar, "\n";