Select Code to Download

my @numbers;

...
    push @numbers, $i;
  }
}

my @numbers = grep { sum(map { $_ ** 3 } split //) == $_ } 100 .. 999;