0

我在 Perl 中使用 P4 模块将文件添加到存储库:

$p4->Run('add', $filename);

但我想像在常规 shell 命令中一样指定更改列表名称:

p4 add [-c changelist] filename

简而言之,我想知道我如何传递标志。

谢谢

4

3 回答 3

1

我知道这是又快又脏,但你能不能只用

system "p4 add -c $changelist $filename";

如果你使用 "" 这将在 perl 中插入变量,我假设这就是你需要的。

于 2013-10-30T08:10:38.690 回答
0

最后我使用了以下模板:

$change = $p4->FetchChange();
$change->{ 'Description' } = "Some description";
$p4->RunSubmit( "-r", $change );

它还提交文件

于 2013-11-06T08:42:51.357 回答
0

这应该有效:

$p4->Run('add', '-c', $changelist, $filename);

Run 方法的P4Perl API 文档没有明确说明如何传递选项。但是,其余文档中有显示选项传递的示例($p4->RunSubmit( "-r", $change );例如。)

于 2013-11-04T23:52:52.550 回答