sub do_that {
  my $self = shift;
  my %args = ref($_[0]) ? %{$_[0]} : @_;
  $args{chew} ||= $self->{food} || 'meat';
  return "I like $args{chew)!\n";
}