for (1..10000000) {
    state $n = $_**2;
}