The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Perl::Analysis::Static::Questioner - ask a question about a Perl document

VERSION

version 0.004

DESCRIPTION

ask_for_file ($question, $filename)

ask_for_document ($question, $document)

Asks the question for a document.

If we didn't find any elements, we return immediately with undef. Hoewever, if we have found something, we run our filters over it. We return the result of the filters which might be a reference to a list of elements. If we filtered everything and nothing is left, we return undef.

ask_for_files ($question, $files, ;$step_hook)

Asks a question for a list of files and collects the answers.

The $step_hook is optional. If provided, it is called with the file's name as only argument after the answer for that file is added to the collector.

Results: A collector containing all the answers.

Example: my $collector = $questioner->ask_for_files( $question, $files, sub { print shift } );

INTERNAL METHODS

_filter ($question, $elements)

AUTHOR

Gregor Goldbach <glauschwuffel@nomaden.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2011 by Gregor Goldbach.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.