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 AUTHOR Michal Špaček LICENSE AND COPYRIGHT BSD license. VERSION 0.04