diff --git a/.perlcriticrc b/.perlcriticrc
index 32f8cfb..f37d500 100644
--- a/.perlcriticrc
+++ b/.perlcriticrc
@@ -1,4 +1,4 @@
-severity = 4
+severity = 3
 
 # severity five ===============================================================
 
@@ -24,6 +24,9 @@ allow_last_statement_to_be_comma_separated_in_map_and_grep = 1
 
 # severity three ==============================================================
 
+[-RegularExpressions::RequireExtendedFormatting]
+# they're not all complex
+
 # severity two ================================================================
 
 # severity one ================================================================
\ No newline at end of file
diff --git a/critique.pl b/critique.pl
index fe8104e..19fe15e 100644
--- a/critique.pl
+++ b/critique.pl
@@ -1,17 +1,18 @@
 use strict;
 use warnings;
 
+use Perl::Critic;
+
 my @FILES = qw(
-	buttbot.pl
-	Butts.pm
-	t/Butts.t
-	critique.pl
+  buttbot.pl
+  Butts.pm
+  t/Butts.t
+  critique.pl
 );
 
-use Perl::Critic;
 my $critic = new Perl::Critic;
 
 for my $file (@FILES) {
-	print "Critiquing $file...\n";
-	print $critic->critique($file);
+  print "Critiquing $file...\n";
+  print $critic->critique($file);
 }
\ No newline at end of file