$ perl $\="\n"; print log(3**34)/log(2); use integer; print int(3**34); __END__ 53.8887250245193 16677181699666570