my $foo = Foo->new(data => { this => 1, that => 2 });
$foo->this #  returns $foo->data->{this}
$foo->that(10) # sets $foo->data->{that} = 10