{ foo => { bar => sub {
      use warnings;
      use strict 'refs';
      my($x, $y) = @_;
      return $x * $y;
} } }
