Barry,
Win32::OLE is used to invoke UniObjects that are described in the
documentation within the UniDK. The connection does take a license and
the connection will fail if all licenses are in use. Always check
$uv->IsActive to see if the connection was made. For maximum
performance call UV subroutines instead of directly executing commands.
Eg.
...
my $subr = $uv->Subroutine('COMMAND.SUB', 2);
$subr->SetArg(0, "COUNT VOC");
$subr->Call; # call subroutine
if ($subr->Error) { print $subr->Error, "\n" }
$result = $subr->GetArg(1);
$result =~ tr/\376/\012/; # FM to LF
...
Where COMMAND.SUB "EXECUTEs" the first argument and returns the result
in the second.
>Date: Wed, 3 May 2006 09:27:28 -0700
>From: "Barry Brevik" <[EMAIL PROTECTED]>
>Subject: RE: [U2] UniVerse + PERL
>
>>You can also use Win32::OLE to connect to UV. This script counts the
>>VOC:
>
>Wow! This is way cool!
>
>Where can I learn more about using Win32::OLE to mine UV files?? Also,
does the connection use a license? By which I >mean, if all licenses are
in use, will the Perl connection fail? We have been running at, or near
our user limit for some >time now.
>
>Great post!
>
>Barry Brevik
Kevin Sproule
Sr. Technical Consultant
AFS Technologies, Inc.
2141 E. Highland Ave.
Suite 100
Phoenix, AZ 85016
Office 602-522-8181 | Mobile 602-549-0470 | Email [EMAIL PROTECTED]
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
