$u ||= ''; $v ||= ''; my $c = $u . $v; #### my $c = ($u ||= '') . ($v ||= ''); #### my $c = (defined $u ? $u : '') . (defined $v ? $v : '');