Cómo quemar CPU / burn CPU

#!/bin/bash
# e.g. for 4 processors, burn CPU for 10 mins
for i in 1 2 3 4; do
    perl -e '$z=time()+(10*60); while (time()<$z) { $j++; $j *= 1.1 for (1..9999); }'
done
wait