Yukicoder No.494 yukicoder

implementation

perl $32$byteを提出。

$ cat a.pl | sed -f<(echo 's/\0/\\\\0/')
print'?'^(<>^yukicoder)=~s/\0//gr

各文字でxorしてnull byteを除去して引き戻すだけ。

鑑賞

私のそれからさらに改善があって、

• ... for<>^yukicoderとする
  • %20さん $31$byte: http://yukicoder.me/submissions/159361
• yukicoderに先に?????????をxorしておく
  • tailsさん $27$byte: http://yukicoder.me/submissions/159453

最終的にはruby $16$byteになっていた: http://yukicoder.me/submissions/159654。

これは以下のような性質を用いるもの。

>>> chr(sum(map(ord, 'yukicoder')) - sum(map(ord, 'yuki?oder')) + ord('?'))
'c'