my $test = 'a' if shift; #### sub test { my $arg = shift; my $test = ''; defined $arg and $test = 'a'; $test .= 'b'; return $test; } #### b b