Select Code to Download

123
12
...
15
27
336

open FILE, "<", "file.txt";
chomp(@array=<FILE>);
close FILE;

#!/usr/bin/perl

...
        close OUTPUT;
    }
}