#!perl -pa $\=m??|$\*grep$_%3,@F}{