$foo->that(10) # sets $foo->data->{that} = 10