发新话题
打印

[已解决] unix下,如何查看所有lock的vob?( 此文章被查看:1056次,被回复:3篇!! )

unix下,如何查看所有lock的vob?

unix下现有一堆vob,但是不清楚哪些vob被lock了。
需要对这些vob解锁,有没有什么命令啊?

小弟的想法是用管道命令先查找,然后再解锁,但是命令总写不出来,请高手指点

[ 本帖最后由 st_simon 于 2006-12-27 11:01 编辑 ]


问题已经解决 [打开主题]
本主题的最佳答案为 [ 2 楼].



© 本文为 st_simonSCMLife 共同所有,未经同意,请勿转载 ©如该文侵犯了您的版权,请联系管理员

——惊是一种突然的觉醒。
我生下来不是求人谅解与同情的。

TOP

复制内容到剪贴板
代码:
#!/usr/bin/env perl -w

#lock or unlock vob

if ($#ARGV eq 0)

{

        $action=shift(@ARGV);

        die "error command,must be lock or unlock" if (($action ne "lock")&&($action ne "unlock"));

}

else

{

        print "use :perl $0 {lock|unlock}\n";

        exit 1;

}



@voblist=`cleartool lsvob -s`;

foreach (@voblist)

{

        chomp($_);

        system qq(cleartool $action -c "$action by among" vob:$_);

}
[ 本帖最后由 among 于 2007-1-4 16:01 编辑 ]


最佳答案
该回答被楼主/管理员列为正解!



© 本文为 amongSCMLife 共同所有,未经同意,请勿转载 ©如该文侵犯了您的版权,请联系管理员
Where are we ?

TOP

请问木木这段代码要写在哪里?



© 本文为 没有蛀牙SCMLife 共同所有,未经同意,请勿转载 ©如该文侵犯了您的版权,请联系管理员
i生活,i音乐!

TOP

单独运行,锁定或解锁所有的vob,当前region下的.

perl $0 lock
or perl $0 unlock

© 本文为 among 所有,未经同意,请勿转载
©如该文侵犯了您的版权,请联系管理员
Where are we ?

TOP

发新话题