Remove pod from perl code
use Pod::Strip; my $p=Pod::Strip->new; # create parser my $podless; # set output string $p->output_string(\$podless); # see Pod::Simple $p->parse_string_document($code); # or some other parsing method # from Pod::Simple # $podless will now contain code without any POD
Pod::Strip is a subclass of Pod::Simple that strips all \s-1POD\s0 from Perl Code.
All methods besides those listed here are inherited from Pod::Simple
\$1
Generate a new parser object. Call this method with a true argument to replace \s-1POD\s0 with comments (looking like \*(L"# stripped \s-1POD\s0\*(R") instead of stripping it.
This has the effect that line numbers get reported correctly in error messages etc.
Thomas Klausner, \*(C`<[email protected]>\*(C'
Please report any bugs or feature requests to \*(C`[email protected]\*(C', or through the web interface at <http://rt.cpan.org>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
Copyright 2004, 2005, 2006 Thomas Klausner, All Rights Reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.