package Widget;

use overload '%{}' => sub {
    my $self = shift;
    tie my %h, __PACKAGE__, $self;
    \%h;
};