例如,给定一个空文件テスト.txt,我将如何创建一个名为テスト.txt.copy的副本
我的第一个漏洞成功地访问了文件并创建了新的文件名,但是副本生成了テスト.txt.copy。
这是我的第一次尝试:
#!/usr/bin/env perl
use strict;
use warnings;
use English '-no_match_vars';
use File::Basename;
use Getopt::Long;
use File::Copy;
use Win32;
my (
$output_relfilepath,
) = pro