Help for this page
my $data = { one => 1, two => 2 }; sub data { return $data; }
my $proto = ref $self; print $proto->data;
print $self->data;