sub load_data {
     my $self = shift;

     $self->{$0} = 'data i created';
}