# HG changeset patch
# User HackEso <hackeso@esolangs.org>
# Date 1526442399 -3600
# Node ID f89272f6a69d605ca223c24a065e0e0c1d2e94e8
# Parent  6b0304dcec5c2040247d0d5a0fb081dafeb8482d
<oerjan> ` cd bin; cp welcome \xd0\xb4\xd0\xbe\xd0\xb1\xd1\x80\xd0\xbe-\xd0\xbf\xd0\xbe\xd0\xb6\xd0\xb0\xd0\xbb\xd0\xbe\xd0\xb2\xd0\xb0\xd1\x82\xd1\x8c; sled \xd0\xb4\xd0\xbe\xd0\xb1\xd1\x80\xd0\xbe-\xd0\xbf\xd0\xbe\xd0\xb6\xd0\xb0\xd0\xbb\xd0\xbe\xd0\xb2\xd0\xb0\xd1\x82\xd1\x8c//s,welcome,welcome.ru,g

diff -r 6b0304dcec5c -r f89272f6a69d bin/добро-пожаловать
--- a/bin/добро-пожаловать	Wed May 16 04:46:17 2018 +0100
+++ b/bin/добро-пожаловать	Wed May 16 04:46:39 2018 +0100
@@ -1,2 +1,2 @@
 #!/usr/bin/perl -w
-if (defined($_=shift)) { s/ *$//;  s/ +/ @ /g; exec "bin/@", $_ . " ? welcome.ru"; } else { exec "bin/?", "welcome"; }
+if (defined($_=shift)) { s/ *$//;  s/ +/ @ /g; exec "bin/@", $_ . " ? welcome.ru"; } else { exec "bin/?", "welcome.ru"; }