Acme::AtIncPolice - The police that opponents to @INC contamination
use Acme::AtIncPolice; # be killed by Acme::AtIncPolice push @INC, sub { my ($coderef, $filename) = @_; my $modfile = "lib/$filename"; if (-f $modfile) { open my $fh, '<', $modfile; return $fh; } }; # be no-op ed by Acme::AtIncPolice push @INC, "lib";
If you use Acme::AtIncPolice, your program be died when detects any reference value from @INC.
@INC hooks is one of useful feature in the Perl. It's used inside of some clever modules.
But, @INC hooks provoke confuse in several cases.
A feature that resolve library path dynamically is needed on your project that is simple web application? Really?
The answer is "NO".
Let's go on. Acme::AtIncPolice gives clean programming experience to you. Under Acme::AtIncPolice, @INC hooks is prohibited.
If you found a "smelly" program, Let use Acme::AtIncPolice on it.
Copyright (C) ytnobody.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
ytnobody <ytnobody@gmail.com>
To install Acme::AtIncPolice, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Acme::AtIncPolice
CPAN shell
perl -MCPAN -e shell install Acme::AtIncPolice
For more information on module installation, please visit the detailed CPAN module installation guide.