$a=$/,print${$a=chr(($_%=2**32)%31+62).$a,$_=0|$_/31-2while$_;a}for<>