BJIR6VCGO3J5FEUEMVA7RGIRIDZYSH6ZBYAZSC2FZZ24QDL7APXQC IRZYSVNO3XDP7JHJKK2E3NECZRG6XEXWJQHYBSZXCYS5A74BRKMQC 2JJP76737U2JWJWQ6UDFEAQCGWRAQH46HC6OCIKWMB5QYRXF6DQQC UBUZPF7JTIJ4LG3CMRMSDPHMTRCNEXLWOP4C6G6BJXPDKDZYY3KAC CLXEECMFKLUIN5QBV3BPPPSU6G5UF6MXRSNWA6LXUBNQGSJY4U5QC TOTCBKRU5D4BAU5EIWABZRDYODINJ36EGBSBIRSAO4IN6F77TYCAC NVMDS7GEK2IXP22V2MRTJ4KVM6K3MG4BVFQEGQEEA5HB7DQCM2MQC LA5L7JCUOVXUIH3IF2Y4MWQPQT65G23W5533FSKRUA7QMDQUJFIAC G2ZB6464XGPBIMSZIPSB24EIXSCCGV4XWC3IWPS2CXYPDSUZSU5QC theme = community# 5 is the least complainy, 1 is the most complainyseverity = 5
#!/usr/bin/env perluse strict;use warnings;use Cwd 'abs_path';use File::Basename;my $dirname = abs_path(dirname(__FILE__) . "/..");print STDERR "Executing perlcritic against $dirname\n";chdir($dirname) or die "Failed to enter $dirname\n";exec("perlcritic", ".") or die "Failed to execute perlcritic.";