Select Code to Download

use File::DosGlob;
my @matches= glob( qq<"$file"> );
( my $slashed= $file ) =~ s/\s/\\\1/g;
my @files= glob( $slashed );