Title: RE: Identify if a program is running on a Laptop or Desktop system
...or check for battc.sys
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] On Behalf Of [EMAIL PROTECTED]
Sent: Monday, September 11, 2006 3:03 PM
To:
Google: scriptomatic
Microsoft provides this tool to demonstrate how to utilize WMI.
One of the features is to output code in various languages, PERL being
one.
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Steve Howard (PFE)
Readdir and file::copy?
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Gary Yang
Sent: Thursday, January 24, 2008 2:16 PM
To: perl-win32-users@listserv.ActiveState.com
Subject: Questions on porting Perl from Unix to Windows
Hi All,
I need
Aside from the userid and possibly the password, your code looks good.
I copied the code and ran it with no issues.
By default, the admin account is named 'administrator' not 'admin'
Output was:
DBI::db=HASH(0x1b9fd3c)
ServicePackMajorVersion is 3
ServicePackMinorVersion is 0
I've used Win32-OLE to start/execute processes on remote computers. In
this scenario you could use Win32-OLE to call time
-Original Message-
From: perl-win32-users-boun...@listserv.activestate.com
[mailto:perl-win32-users-boun...@listserv.activestate.com] On Behalf Of
Barry Brevik
To the best of my knowledge (I'd love to be wrong here), this
information does not exist.
Best case scenario, you'd have to turn on some audit flags and from
there parse event log information. Also, this would only work from a
point in time.
We chose to leverage a logon script with a sub routine
Sorry, I just found this code snippet I had tucked away. Having it is
one thing, knowing where you put it is another! :)
use Win32;
use Win32::NetAdmin;
use strict;
my @all;
Win32::NetAdmin::GetServers(undef, MYDOMAIN, SV_TYPE_ALL, \@all);
foreach my $computer(sort @all){
my