CQProductInfo オブジェクトを作成します。その後このメソッドを使用すると、製品情報を取得できます。
Perl
$ClearQuestObj->CreateProductInfo();
Perl
use CQPerlExt;
my $cqobject = CQClearQuest::Build();
my $prodinfo = $cqobject->CreateProductInfo();
print $prodinfo->GetProductVersion(),"¥n";
CQClearQuest::Unbuild($cqobject);