NAME

Foo - bar ...

my $fh = fh_from_string($src);
my $module = Module::Metadata->new_from_handle($fh, 'Foo.pm');
ok($module->contains_pod(), 'This module contains POD');
}

{ my $src = <<'...'; package Foo; 1;

NAME

Foo - bar

AUTHORS

Tokuhiro Matsuno ...

my $fh = fh_from_string($src);
my $module = Module::Metadata->new_from_handle($fh, 'Foo.pm');
ok($module->contains_pod(), 'This module contains POD');
}