kako dobiti informacije o hardware-u

kako dobiti informacije o hardware-u 06.09.2005. u 14:30 · pre 257 meseci #1

Kako da uz pomoc perl-a dobijem informacije o hardveru kako na lokalnom racunaru tako i na racunarima na mrezi ?
Nasao sam neke skripte na internetu i uz pomoc njih sam dobio informacije o instaliranom software-u ali nisam uspeo da dobijem informacije o hardware-u.

Re: kako dobiti informacije o hardware-u 06.09.2005. u 21:06 · pre 257 meseci #2

Jednostavno koriscenjem /proc pseudo-fajl sistema.

_{[Ovu poruku je menjao zaljubljeni dana 06.09.2005. u 21:06 GMT+1]}

uz klasicno otvaranje fajlova iz datog VFS-a.

Code:

c0re:~> cat perl
#!/usr/bin/perl -w

print "Unesi ime fajla ->";
chomp($ime = <STDIN>);

open (FAJL,$ime) || die "Can't Open File: $ime\n";

@arrayfile = <FAJL>;
print @arrayfile;

Re: kako dobiti informacije o hardware-u 07.09.2005. u 10:07 · pre 257 meseci #3

Meni treba skripta pomocu koje mogu da dobijem informacije o pc hardware-u, a ne skripta pomocu koje otvaram i citam sadrzaj nekog fajla.

Re: kako dobiti informacije o hardware-u 07.09.2005. u 11:09 · pre 257 meseci #4

pa lepo ti je chovek napisao u /proc imas sve sto te interesuje.

ako hoces info za cpu otvoris fajl /proc/cpuinfo i onda radi sta hoces ;)

Potpis

When you say "I wrote a program
that crashed Windows", people
just stare at
you blankly and say "Hey, I got
those with the system, *for
free*".
-- Linus Torvalds

Re: kako dobiti informacije o hardware-u 07.09.2005. u 12:16 · pre 257 meseci #5

Moja je greska u pitanju, nisam napomenuo da se radi o windows-u.

Re: kako dobiti informacije o hardware-u 07.09.2005. u 12:32 · pre 257 meseci #6

e tu ti ne mogu pomoci :>
mozda ce zaljubljeni znati

Potpis

When you say "I wrote a program
that crashed Windows", people
just stare at
you blankly and say "Hey, I got
those with the system, *for
free*".
-- Linus Torvalds

Re: kako dobiti informacije o hardware-u 07.09.2005. u 16:10 · pre 257 meseci #7

Obrade ja sam mislio za linux i to je to ;0

@sqla ma da verovatno znam za win lol ;0

Mozda prouci kako vadi onaj qrac System Information na winu.

Re: kako dobiti informacije o hardware-u 11.09.2005. u 03:54 · pre 257 meseci #8

Mozda lupam ali mislim da se kod windowsa u system registryju nalaze i podaci o hardveru.Ako sam u pravu onda se raspitaj na netu gde se tacno nalaze ti podaci i koristi modul Win32::TieRegistry da pristupis registriyu

Re: kako dobiti informacije o hardware-u 13.12.2005. u 08:47 · pre 254 meseca #9

Uspeo sam da uz pomoc WMI-a dobijem najrazlicitije informacije. Evo prilazem jedan deo koda:

use Win32::OLE('in');
use constant wbemFlagReturnImmediately => 0x10;
use constant wbemFlagForwardOnly => 0x20;

my ($computer) = shift || "";
$objWMIService = Win32::OLE->GetObject
("winmgmts:\\\\$computer\\root\\CIMV2") or die "WMI connection failed.\n";
$colItems = $objWMIService->ExecQuery
("SELECT * FROM Win32_ComputerSystem","WQL",wbemFlagReturnImmediately | wbemFlagForwardOnly);

print "System info:\n\n";

foreach my $objItem (in $colItems)
{
print "Manufacturer: $objItem->{Manufacturer}\n";
print "Model: $objItem->{Model}\n";
print "Name: $objItem->{Name}\n";
print "Primary Owner Name: $objItem->{PrimaryOwnerName}\n";
print "Status: $objItem->{Status}\n";
print "Total Physical Memory: $objItem->{TotalPhysicalMemory}\n";
print "User Name: $objItem->{UserName}\n";
print "\n";
}

Forum kao aplikacija na telefonu

Srodne teme