#!perl -lp eval'$_|=$_/2;'x9;$_++