@divisors = grep { $number % $_ == 0 } 1 .. sqrt($number);