$foo->{gnarfle} = 'garthok' if defined $foo;