#!perl -pl $_^=reverse;$_=y///c+1>>1