@s=sort shift=~/./g;print grep[sort/./g]~~@s,<>