Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Read registry error (no tips)

by tye (Cardinal)
on Oct 30, 2012 at 02:20 UTC ( #1001444=note: print w/ replies, xml ) Need Help??


in reply to Read registry error

Windows 7 doesn't come with Tips. Below I picked a different Registry key that I find often fills up with simple text data and also only asked for 'read' access:

use Win32::TieRegistry( Delimiter => '/' ); sub isExist{ my $tips= $Registry->Open( "HKEY_LOCAL_MACHINE/Software/Microsoft/Windows/CurrentVersion/ +Run/", { Access => 'KEY_READ' }, ) or die "Can't find the 'Run' key: $^E\n"; foreach( keys %$tips ) { print "$_: ", $tips->{$_}, "\n"; } } isExist();

It works for me on Windows 7. But it wouldn't work if you don't even have 'read' access to that part of the Registry (seems unlikely). And it will report nothing if you don't have any "Run" entries (I've never been so lucky).

- tye        


Comment on Re: Read registry error (no tips)
Download Code
Re^2: Read registry error (no tips)
by anaconda_wly (Scribe) on Oct 31, 2012 at 08:28 UTC
    Your way is OK for me. Thanks!

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1001444]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (14)
As of 2014-09-22 15:00 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (198 votes), past polls