Select Code to Download

use strict;
use warnings;
...
}

print "@other";

use strict;
use warnings;
...
    for 0 .. $#array / 4;

print "@other";