print test(), "\n"; print test(), "\n"; sub test { my $test = 'a' if shift; $test .= 'b'; } #### b bb