Select Code to Download

use strict;
use File::Find::Rule;
my @array = File::Find::Rule->new->in($dirphoto);