use bigint;$n=1;$n*=42,print"$n
"x/42/for 1..4242