Pod::Snippets ------------- A module to parse POD and retreive pieces of verbatim text in it, so as to treat it as data or code (eg for unit testing those SYNOPSISes). Snippets can be named using custom POD markup. It goes like this: =head1 NAME Foo - My module that goes beep =head1 SYNOPSIS =for example "synopsis" begin my $foo = new Foo; =for example "synopsis" end Meanwhile, in the test script : use Foo; use Test::More tests => 1; use Pod::Snippets; my $snips = Pod::Snippets->load ($INC{"Foo.pm"}, -markup => "example", -named_snippets => "strict"); my $foo = eval $snips->named("synopsis")->as_code; die $@ if $@; is(ref($foo), "Foo"); If you prefer, you could use "=for tests", "=for Pod::Snippets" or even "=for great justice" instead of "=for example". There are more examples in eg/. Pod::Snippets is designed to be easy to re-use: its code consists of a single Perl file with no dependencies besides what a stock Perl provides (5.6 or later). INSTALLATION To install this module, run the following commands: perl Build.PL ./Build ./Build test ./Build install COPYRIGHT AND LICENCE Copyright (C) 2007 Dominique QUATRAVAUX This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.