Select Code to Download

#!/usr/bin/perl -w
use strict;
use Win32::OLE;
...
if (Win32::OLE->LastError() != 0){
    print 'Error: ', Win32::OLE->LastError();
}

Win32::OLE operating in debugging mode: _Unique => 1
Win32::OLE(0.1709) error 0x80040154: "Class not registered" at C:\User
+s\boss\VSS-analysis\accessvss.pl line 4.
    eval {...} called at C:\Users\boss\VSS-analysis\accessvss.pl line 
+4
Can't call method "Open" on an undefined value at C:\Users\boss\VSS-an
+alysis\accessvss.pl line 9.