$i % $_ == 0 and return for 2..(($i/2)+1);