You can use Win32 :: FileOp package from cpan.
Here is the relevant passage:
Copyconfirm
CopyConfirm ($FileName => $FileOrDirectoryName [, ...])
CopyConfirm (\@FileNames => $DirectoryName [, ...] )
CopyConfirm (\@FileNames => \@FileOrDirectoryNames [, ...])
Copies the specified files. In the event of a collision, it displays a confirmation dialog box. Shows Progress Dialogs.
Returns true if successful.
Moveconfirm
Moves the specified files. Parameters as CopyConfirm
Term:: ProgressBar, , . - : , ( ), .