Perl CopyDw.pl