Program Repair Shop

`Make Relationships Explicit`

        sub GrabFileList {
           for my $dir (@InputDIR) {
             opendir (FILELISTDIR,$dir);
             push @FileList, map "$dir/$_", readdir FILELISTDIR;
             closedir FILELISTDIR;
           }
        }

However, in this case this approach is not such a good fit
Later on, CopyFiles will insert another item between $dir and $_:

      47        $x2 = $InputDIR1.$NextOut."/".$CopyList;

We could fix CopyFiles to take apart the full path and reassemble it
That works, but it is wasteful
Why assemble the path, dismantle it, and reassemble it?
Better approach: Keep the file lists from the various InputDIRs separate