use Perl::Critic::Command qw< run >;
local @ARGV = qw< --statistics-only lib bin >;
DESCRIPTIONThis is the implementation of the perlcritic command. You can use this to run the command without going through a command interpreter.
INTERFACE SUPPORTThis 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.
TO DOMake "run()" take parameters. The equivalent of @ARGV should be passed as a reference.
Turn this into an object.
AUTHORJeffrey Ryan Thalhammer <[email protected]>
COPYRIGHTCopyright (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.