Select Code to Download

use strict;
use warnings;
...
my $to = "path/to/new/directory/*.cmd";

copy($from, $to) or die "Copy failed: $!";