The code I worked out by now is the following:
use strict;
use Win32::OLE;
print "Instantiating CAL";
my $CCApp = Win32::OLE->new("ClearCase.Application") or
die "Can't create ClearCase application object via call to Win32::OLE->new(): $!";
print "Getting VOBs";
my @CCVob = $CCApp->VOBs();
my $CCVobLength = @CCVob;
print "CCVobLength = $CCVobLength";
With this script I can see that there is one VOB within the CCApp. But I can't figure out how to continue and query the VOB for its name, type or anything useful.
I guess I should add that I'm pretty new to Perl and used to develop software using C, C++ and Java...
There I would cast the element to the appropriate type and then use some interface function to continue...
Thanks in advance for any answer and regards