use Win32::OLE;
my $SS= new Win32::OLE:: "SourceSafe";