a="$System.in"*1;i=0
(a-~/.*\n/).any{print"_"==it?a[i++]:it}