-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 People who care about Perl and quality,
Here comes Pod::Snippets, a new module for putting those snippets of code in the POD under unit tests (there are other uses too). This is a followup to a discussion that started here about testability of synopsises and such, see http://www.nntp.perl.org/group/perl.qa/2007/06/msg8701.html It goes like this (From the README): =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"); Comments appreciated. - -- << Tout n'y est pas parfait, mais on y honore certainement les jardiniers >> Dominique Quatravaux <[EMAIL PROTECTED]> -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.6 (GNU/Linux) Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org iQCVAwUBRw3t/PTYH7KfeIIFAQKOtgQAnUQjKVKSaeT+J2ZQF0+TYYZ7S6ZX0MEl 7laAFbf/MnjLb6RaRu7CO2n7rpFfHjKp6VFmw13ZAo7BUwRuWalIJ0uF5UiE2BuU P2+GC3RcIy7A/WXt38IHn0/7qCKehLtWmqKbh84JDRl6iMAeymwIO9eTQ4KoEjRV unSyizKlrfM= =clJY -----END PGP SIGNATURE-----
