Select Code to Download

 $ perl -le "print log(~0+1)/log(2)"
32

 $ perl -e 'printf "%.0f\n", log(~0+1)/log(2)'
32