# New Ticket Created by Tony ODell
# Please include the string: [perl #125196]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=125196 >
CODE:
-----------------------------------------
my $promise = start { sleep 1; $*E.say;};
my $*E = 5;
await $promise;
-----------------------------------------
EXPECTED:
-----------------------------------------5-----------------------------------------
ACTUAL:
-----------------------------------------===SORRY!===Dynamic variable $*E not
found-----------------------------------------
Other notes:
Putting the 'my $*E'... before the start block has same output
Changing $*E to $E yields:
-----------------------------------------(Any)-----------------------------------------
Changing $*E to $E *and* moving the declaration to prior to the start block
yields expected output.