rc/perlcriticrc

   1 ################################################################################
   2 #
   3 # File:         $RCSfile: perlcriticrc,v $
   4 # Revision:     $Revision: 1.3 $
   5 # Description:  Perlcritic defaults
   6 # Author:       Andrew@DeFaria.com
   7 # Created:      Fri Jan 23 11:08:55 MST 2009
   8 # Modified:     $Date: 2011/01/09 01:04:56 $
   9 # Language:     perltidy
  10 #
  11 # (c) Copyright 2000-2009, Andrew@DeFaria.com, all rights reserved.
  12 #
  13 ################################################################################
  14 severity                = harsh
  15
  16 # We think these are really important, so always load them
  17 [TestingAndDebugging::RequireUseStrict]
  18 severity = 5
  19
  20 [TestingAndDebugging::RequireUseWarnings]
  21 severity = 5
  22
  23 # We like function prototypes
  24 [-Subroutines::ProhibitSubroutinePrototypes]
  25
  26 # Not every regex needs to be fully explained
  27 [RegularExpressions::RequireExtendedFormatting]
  28 minimum_regex_length_to_complain_about = 20
  29
  30 # Backticks only in non void contexts
  31 [InputOutput::ProhibitBacktickOperators]
  32 only_in_void_context = 1
  33
  34 # Reading from STDIN should be OK
  35 [-InputOutput::ProhibitExplicitStdin]
  36
  37 # Cascading elsif's are not that difficult to understand. Switch is not
  38 # that much easier. And switch is not available without a CPAN module install
  39 # which is not always available
  40 [ControlStructures::ProhibitCascadingIfElse]
  41 max_elsif = 99
  42
  43 # In multipocess situations you don't want to localize %SIG or you can get
  44 # defunct children.
  45 [Variables::RequireLocalizedPunctuationVars]
  46 allow = %SIG
  47
  48 # Actually I find reading regex's is not that hard. Perl programmers should be
  49 # able to do it. Besides it's not the character count that makes a regex
  50 # complicated - it's more it's complication than the number of characters.
  51 [RegularExpressions::RequireExtendedFormatting]
  52 minimum_regex_length_to_complain_about = 50
  53
  54 # I'm OK with homonyms
  55 [-Subroutines::ProhibitBuiltinHomonyms]
  56
  57 # I'm OK with so called ambiguous names
  58 [-NamingConventions::ProhibitAmbiguousNames]