perl -e'printf "%b\n", time while sleep 1'