Help for this page

Select Code to Download


  1. or download this
    
use strict;
...
my $cluster = Win32::OLE->new('MsCluster.Cluster');
print Dumper($cluster);
$cluster->Open('') or die $^E;
  2. or download this
    Win32::OLE(0.1502) error 0x80020009: "Exception occurred"
    in METHOD/PROPERTYGET "CommonProperties" at C:\ESC\ORACLE\PERL\LIB
+/Data/Dump
...
                 'Networks' => undef,
                 'NetInterfaces' => undef
               }, 'Win32::OLE' );