NAME
App::Pod::Example - Base class for pod_example script.
SYNOPSIS
use App::Pod::Example;
my $app = App::Pod::Example->new(%parameters);
$app->run($file_or_module, $section);
METHODS
"new(%parameters)"
Constructor.
* "debug"
Debug flag. It means print debug messages.
Default value is 1.
* "enumerate"
Enumerate lines in print output.
Default value is 0.
* "print"
Print flag. It means print of example.
Default value is 0.
* "run"
Run flag. It means run of example.
Default value is 1.
"run($file_or_module, $section, $number_of_example)"
Run method.
$file_or_module - File with pod doc or perl module.
$section - Pod section with example. Default value is 'EXAMPLE'.
$number_of_example - Number of example. Default value is 1.
ERRORS
new():
Cannot process any action.
From Class::Utils::set_params():
Unknown parameter '%s'.
EXAMPLE
# Pragmas.
use strict;
use warnings;
# Modules.
use App::Pod::Example;
# Run.
App::Pod::Example->new(
'enumerate' => 1,
'print' => 1,
'run' => 1,
)->run('Pod::Example');
CAVEATS
Examples with die() cannot process, because returns bad results.
DEPENDENCIES
Class::Utils, English, Error::Pure, Pod::Example, Readonly.
REPOSITORY
<https://github.com/tupinek/App-Pod-Example>
AUTHOR
Michal Špaček <mailto:skim@cpan.org>
<http://skim.cz>
LICENSE AND COPYRIGHT
BSD license.
VERSION
0.05