Mercurial > repo
diff bin/добро-пожаловать @ 12091:2cb55f10fa46 draft
<fizzie> revert
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Sat, 16 Nov 2019 22:19:08 +0000 |
parents | 3ae7ca729048 |
children | ceb43c4d37de |
line wrap: on
line diff
--- a/bin/добро-пожаловать Sat Nov 16 22:18:51 2019 +0000 +++ b/bin/добро-пожаловать Sat Nov 16 22:19:08 2019 +0000 @@ -1,2 +1,2 @@ #!/usr/bin/perl -w -my $bin = $ENV{"HACKENV"}; if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "$bin/@", $_ . " ? welcome.ru"; } else { exec "$bin/?", "welcome.ru"; } +if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? welcome.ru"; } else { exec "bin/?", "welcome.ru"; }