use Test::More tests => 5; use lib "../lib"; BEGIN { use_ok( 'Pod::Simple::Select' ); } my $p = Pod::Simple::Select->new (); isa_ok ($p, 'Pod::Simple::Select'); $p->select(["head1", ["NAME", "VERSION"]]); $p->output_hash(); my %h = $p->parse_file("../lib/Pod/Simple/Select.pm");