| Server IP : 93.86.61.54 / Your IP : 216.73.216.206 Web Server : Apache/2.4.62 (Ubuntu) System : Linux rasin.ddns.net 6.8.0-124-generic #124~22.04.1-Ubuntu SMP PREEMPT_DYNAMIC Tue May 26 21:05:19 UTC x86_64 User : www-data ( 33) PHP Version : 8.4.22 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /usr/share/perl5/strictures/ |
Upload File : |
package strictures::extra;
use strict;
use warnings FATAL => 'all';
sub import {
$ENV{PERL_STRICTURES_EXTRA} = 1;
}
sub unimport {
$ENV{PERL_STRICTURES_EXTRA} = 0;
}
1;
__END__
=head1 NAME
strictures::extra - enable or disable strictures additional checks
=head1 SYNOPSIS
no strictures::extra;
# will not enable indirect, multidimensional, or bareword filehandle checks
use strictures;
=head1 DESCRIPTION
Enable or disable strictures additional checks, preventing checks for C<.git>
or other VCS directories.
Equivalent to setting the C<PERL_STRICTURES_EXTRA> environment variable.
=head1 AUTHORS
See L<strictures> for authors.
=head1 COPYRIGHT AND LICENSE
See L<strictures> for the copyright and license.
=cut