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中创建客户端以及如何在sync命令中使用它。

Answer 1

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

1. 逐个字段或使用模板客户端构建新客户端的规范数据。
2. 使用您的规范数据发出$p4->SaveClient( $clientspec );。

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

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