my %data = default_data();

sub whatever {
  my $self = shift;
  # ...
}