Select Code to Download

#! perl -slw
use strict;
...
    ## Remove the path just processed
    delete $paths[ $file ]
}