Quick fix

use strict;
use warnings;
use diagnostics;

my $from = "path/to/directory/*.cmd";
my $to = "path/to/new/directory/";

`cp $from $to` or die "Copy failed: $!";
[download]

Update: arrg, instead a reply now the former message is lost. This storm is doing strange things with the net...