$_,*b,c=*$<;c[?K]*=99;s$_*-~b.sz,c[0..~/T/]