for ( 2 .. sqrt($i) )  { return $_  unless $i % $_ }