$clearpid = open3 ($clearin, $clearout, $clearout, $cleartool, "-status");
return (-1, ('Clearcase not installed')) unless $clearpid;
$clearpid = open3 ($clearin, $clearout, $clearout, $cleartool, "-status");
return (-1, ('Clearcase not installed')) unless $clearpid;