[perl #133791] perl 6 parser bugging out on a comment thinking it is a real var

[via RT]

# New Ticket Created by  Warren W. Music Jr. 
# Please include the string:  [perl #133791]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=133791 >


Hello:

I ran into this while setting up a post test for json
in bailador.  While compiling it flags the commented
line at the end as bad when the fail should be on the
check of request.body[0].

It happened with the latest rakudo built from scratch
as of Jan 23rd 2019 as well as rakudo-star 2018.10.

Linux Mint system, 64 bit.




#  --->perl6 t1.pl6
   #  ===SORRY!=== Error while compiling 
/home/userx/p6d/tests/latester/t1.pl6
   #  Variable '%bb' is not declared
   #  at /home/userx/p6d/tests/latester/t1.pl6:97
   #  ------>   #pukes here  #say ⏏%bb{"name"};

   # code snippet that causes the parser to think
   # the commented code below is not commented
   if request.body[0] == "{" { say "JSON"} else {say "NOTJSON"};

   #  #my %bb = from-json(request.body);
   #
   # this one pukes
   #pukes here  #say %bb{"name"};