Question

我在Perl脚本中使用SVN::Client。该文档演示了如何获取有关存储在SVN中的文件的信息：

$client->info($path_or_url, $peg_revision, $revision, \&receiver, $recurse);

调用\&receiver向$path_or_url传递有关$revision的信息。 返回的信息是系统生成的元数据，而不是用户创建的“属性”元数据。有关传递给\&receiver的对象的可用方法，请参阅svn_info_t。< / p>

 my $receiver = sub {
     my( $path, $info, $pool ) = @_;
     print "Current revision of $path is ", $info->rev, "\n";
 };
 $client->info( 'foo/bar.c', undef, 'WORKING', $receiver, 0 );

我想返回$info->rev，但尝试类似

my $rev_num = $client->info('foo/bar.c', undef, 'WORKING', $receiver, 0);

返回undef。（显然，将上面的代码段修改为return $info->rev）

有什么方法可以检索此信息（或以其他方式从此方法中提取$info）？

SVN :: Client - 如何获取文件的最新版本号？

0 个答案: