【发布时间】:2013-12-04 14:31:50
【问题描述】:
我正在使用 Perl 的 File::Fetch 从 Teamcity 中最后完成的构建中下载文件。这工作正常,除了文件是版本化的,但我没有得到版本号。
sub GetTeamcityFiles {
my $latest_version = "C:/dowloads"
my $uri = "http://<teamcity>/guestAuth/repository/download/bt11/.lastFinished/MyApp.{build.number}.zip";
# fetch the uri to extract directory
my $ff = File::Fetch->new(uri => "$uri");
my $where = $ff->fetch( to => "$latest_version" );
这给了我一个文件: C:\downloads\MyApp.{build.number}.zip.
但是,下载的文件的名称中包含内部版本号。不幸的是,zip 中没有版本文件,所以这是我告诉我下载了什么文件的唯一方法。有没有办法得到这个版本号? c:\downloads\MyApp.12345.zip
【问题讨论】: