1 files changed, 2 insertions, 2 deletions
diff --git a/perl_checker.src/lexer.mll b/perl_checker.src/lexer.mll
index bf344a4..cfd7af9 100644
--- a/perl_checker.src/lexer.mll
+++ b/perl_checker.src/lexer.mll
@@ -418,11 +418,11 @@ rule token = parse
 | "split"
 | "grep"  { (* ok_for_match! *) BAREWORD(lexeme lexbuf, pos lexbuf) }
 
-| "print " ['A'-'Z'] ['A'-'Z' '0'-'9']* ' ' { 
+| "print " ['A'-'Z'] ['A'-'Z' '0'-'9']* ['\n' ' '] { 
     putback lexbuf 1;
     PRINT_TO_STAR(skip_n_char 6 (lexeme lexbuf), pos lexbuf)
   }
-| "print $" ident ' ' { 
+| "print $" ident ['\n' ' '] { 
     putback lexbuf 1; 
     PRINT_TO_SCALAR(skip_n_char 7 (lexeme lexbuf), pos lexbuf);
   }