Hi list,

Not sure if this is off topic but I have a question about converting a VBScript into Perl(Script). I can't figure out how one would go from converting a few lines like the following to Perl:

In VBScript
===========
Dim objConnections
Dim objConnection

Set objConnections = CreateObject("AnObject.Connections")
  If IsObject(objConnections) Then
     If objConnections is Nothing Then
        WScript.echo "CreateObject failed."
     Else
       WScript.echo "CreateObject successful."
     End If
  End If

Set objConnection = objConnections("My New Connection")

In Perl
===========
my $objConnections;
my $objConnection;


$objConnections = Win32::OLE->new("AnObject.Connections") or die Win32::OLE->LastError; print "Creation successful.\n";

I don't know how here to set $objConnection.

Thanks in advance,

--
Devin Smith

_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to