#!perl -pl $_=grep$'>>$_,//..62