#!perl -pl
~/ /;$_=$`<$'?K:S;