Select Code to Download

my @numbers;
while (<FILE>) {
  push @numbers, $1 if /(\d+)$/;
}

my @numbers = map /(\d+)$/, <FILE>;