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.
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 <jeff@imaginative−software.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.