Allow a closing brace after an "use VERSION"

This fixes [perl #70884] : use VERSION in BLOCK without semicolon -> syntax error

1 files changed, 13 insertions, 1 deletions

diff --git a/t/comp/use.t b/t/comp/use.t
index fade9fec1a..c9b76d79a4 100755
--- a/t/comp/use.t
+++ b/t/comp/use.t
@@ -6,7 +6,7 @@ BEGIN {
     $INC{"feature.pm"} = 1; # so we don't attempt to load feature.pm
 }
 
-print "1..69\n";
+print "1..73\n";
 
 # Can't require test.pl, as we're testing the use/require mechanism here.
 
@@ -62,6 +62,18 @@ sub isnt ($$;$) {
     _ok ('isnt', @_);
 }
 
+eval "use 5";           # implicit semicolon
+is ($@, '');
+
+eval "use 5;";
+is ($@, '');
+
+eval "{use 5}";         # [perl #70884]
+is ($@, '');
+
+eval "{use 5   }";      # [perl #70884]
+is ($@, '');
+
 # new style version numbers
 
 eval q{ use v5.5.630; };