#!/usr/bin/perl6
# your code goes here
my \bash = Proc::Async.new: "/usr/bin/env", "bash", :w;
react {
whenever bash.stdout.lines {
.say;
}
whenever bash.start { }
whenever $*IN.lines {
bash.say("$_");
bash.close-stdin if $_ eq "exit";
}
}
IyEvdXNyL2Jpbi9wZXJsNgojIHlvdXIgY29kZSBnb2VzIGhlcmUKCm15IFxiYXNoID0gUHJvYzo6QXN5bmMubmV3OiAiL3Vzci9iaW4vZW52IiwgImJhc2giLCA6dzsKCnJlYWN0ICB7Cgl3aGVuZXZlciBiYXNoLnN0ZG91dC5saW5lcyB7CgkJLnNheTsKCX0KCXdoZW5ldmVyIGJhc2guc3RhcnQgeyB9Cgl3aGVuZXZlciAkKklOLmxpbmVzIHsKCQliYXNoLnNheSgiJF8iKTsKCQliYXNoLmNsb3NlLXN0ZGluIGlmICRfIGVxICJleGl0IjsKCX0KfQ==