diff --git a/code_examples/Reporting2.pm b/code_examples/Reporting2.pm
index ecaf425..15e2730 100644
--- a/code_examples/Reporting2.pm
+++ b/code_examples/Reporting2.pm
@@ -2,6 +2,11 @@ package TBB::Reporting2;
 
 my $bar =~ s/foob/blag/g;
 
+sub foo {
+    bar()
+    unless 9;
+}
+
 my $foo = {
     'foo',
     'bar',
@@ -132,7 +137,7 @@ sub build_resource_manager {
 
 sub blah {
     foo()
-        unless(1);
+    unless(1);
 }
 
     print 'hi\n';
diff --git a/mode_perl.py b/mode_perl.py
index 4468e4e..8873d1e 100644
--- a/mode_perl.py
+++ b/mode_perl.py
@@ -150,6 +150,7 @@ class PerlTabber(tab2.StackTabber):
                not fqname.startswith('heredoc') and
                not fqname.startswith('string') and
                not fqname.startswith('endblock') and
+               not fqname == 'eol' and 
                not fqname == 'comment' and
                not fqname == 'null' and
                token.string not in ('}', ';', '(', '{', '[', ',')):