Hi Robert
I am also doing & looking exactly the same & some more info .
I have got many info , mails from this helping list , examples on net
which i myself hasn't worked on - what all i know about my own databsae of
this search results is
Win32::
there are some modules for win32
like AdminMisc ( GetProcessInfo() & GetProcesserInfo() for processor ,
GetMemoryInfo() for ram ,GetDriveSpace() for disk )
DO Google for "AdminMisc GetMemoryInfo() " you will find many examples .
Win32:: Tieregistry etc
which will give you u these type of info , for taking info from remote
machines
u may use TieRegistry .
I was thinking of implementing it as
if(unix) { unix funcn }
elsif(windows) { win32 funcn }
http://www.the-labs.com/Perl/ThePerlJournal/Issue_08_Win32/
&
http://www.roth.net/conference/lisant/1999/
have good examples for you .
It must be able to help you .
Regards
Pradeep
----- Original Message -----
From: "Robert Citek" <[EMAIL PROTECTED]>
To: "perl beginners" <[EMAIL PROTECTED]>
Sent: Tuesday, February 25, 2003 11:00 AM
Subject: system info: cpu, ram, disk
>
> Hello all,
>
> How can I find out information about a system in a system-independent
manner?
>
> I wrote a perl script that nicely displays information about a Linux
> system: # of cpus, cpu speed, size of RAM, # of disks, size of disks, IP
> address. The code uses the system() command and relies on the /proc
> psuedo-file system. Now, I would like to have a similar script that runs
> on Win32 systems. I seem to have two choices: 1) write a completely
> different script specific for Win32 or 2) write a system-independent
script
> that will run on both Win32 and Linux.
>
> Ideally, I would like to do option 2. I've searched for commands that
will
> tell me cpu, memory, IP, and disk information on a Win32 system, but have
> not found them. I have found Sys::CPU on CPAN, but that has not been
> tested on Win32 and is only part of what I'm looking for.
>
> Any pointers would be greatly appreciated.
>
> Regards,
> - Robert
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
