# HG changeset patch # User HackBot # Date 1479484795 0 # Node ID d056743e5c1354ddf7f2a1fdfcddf532378ab633 # Parent c4b69188572d8efc2949b0978b5dc1c61284e07e sled bin/wercome//s/wercome/welcome.jp/g diff -r c4b69188572d -r d056743e5c13 bin/wercome --- a/bin/wercome Fri Nov 18 15:59:00 2016 +0000 +++ b/bin/wercome Fri Nov 18 15:59:55 2016 +0000 @@ -1,2 +1,2 @@ #!/usr/bin/perl -w -if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? wercome"; } else { exec "bin/?", "wercome"; } +if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? welcome.jp"; } else { exec "bin/?", "welcome.jp"; }