Provided by: libperl-critic-perl_1.134-1_all
Perl::Critic::Command - Guts of perlcritic.
use Perl::Critic::Command qw< run >; local @ARGV = qw< --statistics-only lib bin >; run();
This is the implementation of the perlcritic command. You can use this to run the command without going through a command interpreter.
This is considered to be a public class. However, its interface is experimental, and will likely change.
"run()" Does the equivalent of the perlcritic command. Unfortunately, at present, this doesn't take any parameters but uses @ARGV to get its input instead. Count on this changing; don't count on the current interface.
Make "run()" take parameters. The equivalent of @ARGV should be passed as a reference. Turn this into an object.
Jeffrey Ryan Thalhammer <email@example.com>
Copyright (c) 2005-2011 Imaginative Software Systems. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of this license can be found in the LICENSE file included with this module.