Perl 6: keypress to exit loop

Run Settings
LanguageRaku
Language Version
Run Command
#!/usr/bin/env perl6 use v6; loop { given prompt('') { when 'q'|'quit' { last; } } }
Editor Settings
Theme
Key bindings
Full width
Lines