Select Code to Download

# Untested
# Use a printf/scanf pattern to match file names
...
my @files = File::Find::Rule->file()
                            ->name( $r )
                            ->in( @w );