From 92d91286b4a68e601d81c23dc0af76d7aed6e3d4 Mon Sep 17 00:00:00 2001
From: "Flavio S. Glock" <fglock@gmail.com>
Date: Fri, 24 May 2019 22:12:14 +0200
Subject: [PATCH] Perlito5 - parser - "use 5.011" or larger loads strict.pm

---
 src5/lib/Perlito5/Grammar/Use.pm | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/src5/lib/Perlito5/Grammar/Use.pm b/src5/lib/Perlito5/Grammar/Use.pm
index 489b7feca..02f77700f 100644
--- a/src5/lib/Perlito5/Grammar/Use.pm
+++ b/src5/lib/Perlito5/Grammar/Use.pm
@@ -72,6 +72,17 @@ token stmt_use {
                 }
             );
 
+            if ($version ge '5.011') {
+                # use strict
+                parse_time_eval(
+                    {
+                        mod       => "strict",
+                        code      => "use",
+                        arguments => undef,
+                    }
+                );
+            }
+
             my $code = feature->can('unimport');
             if (defined($code)) {
                 # no feature ':all';