Select Code to Download

use File::Find;

...
               system qw(gcc -c -o), $o, $_;
           }
} }, '.');

use File::Find;

...
               system qw(gcc -c -o), $a, $_;
           }
}, '.';