1.  my ($ret);       # Create a scalar variable called $ret
2.  $ret ||= foo()   # If $ret is undefined or zero, assign it to foo()