sub foo {
   my $bar = 'baz';
   # some comment