sub foo {
  my $thing = shift;
  $thing->bar();
}