#!perl -lp
$_=grep$'>>$_,//..63