Perforce , Perl , 如何与客户端合作

Question

我是 Perforce 源代码控制的新手，我正在尝试构建一个脚本来登录服务器并将文件获取到工作目录。现在我可以连接到服务器，设置工作文件夹，但我无法获取客户端。

这是连接服务器的代码

$p4 = new P4;

$p4->SetProg($ScriptName);
$p4->SetVersion($ScriptRevision);
$p4->SetCharset($ENV{P4_CHARSET}); 
$p4->SetPort ($ENV{P4_IP_AND_PORT});
$p4->SetClient($ENV{P4_CLIENT});
$p4->SetUser($ENV{P4_USER});
$p4->SetPassword($ENV{P4_PWD}); 

$p4->Connect() or die "blblblblblb" ;

$p4->SetCwd($Working_dir); ## the dir exists

现在我需要创建客户端。是这样吗？

$p4->FetchClient( $ENV{P4_CLIENT} );  

我正在取回一个对象，但是 Runsync 命令失败并出现错误
客户端 'xxxxxx' 未知 - 使用 'client' 命令创建它

我的问题是如何在 Perl 中创建客户端以及如何在同步命令中使用它。

Answer 1

要在 P4Perl 中创建客户端，您需要：

1. 为新客户端构建规范数据，可以逐个字段，也可以使用模板客户端。
2. 使用您的规格数据发送 $p4->SaveClient( $clientspec );。

然后，一旦您创建了描述工作空间的客户端规范，您需要告诉 P4Perl 将该客户端规范用于您的命令：$p4->SetClient( 'my-client-name' );

然后您可以运行同步命令。