[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl-win32-admin
Subject:    Re: Reading Registry Keys
From:       Simon Oliver <Simon.Oliver () umist ! ac ! uk>
Date:       1999-10-28 16:08:15
[Download RAW message or body]

#!perl -w
use strict;
use Win32::TieRegistry;

my ($netcard);

$netcard = $Registry->{"HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows
NT\\CurrentVersion\\NetworkCards\\1"};
print $netcard->{"ServiceName"}, "\n";

#or 

$netcard = $Registry->{"HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows
NT\\CurrentVersion\\NetworkCards\\1\\ServiceName"};
print "$netcard\n";

---
You are currently subscribed to perl-win32-admin as: [perl-win32-admin@progressive-comp.com]
To unsubscribe, forward this message to
         leave-perl-win32-admin-90393O@lyris.activestate.com
For non-automated Mailing List support, send email to  
         ListHelp@ActiveState.com

[prev in list] [next in list] [prev in thread] [next in thread]