Re:What's wrong with this?

[Jorge Goncalvez]

Hi, I have this:
#!/usr/local/bin/perl -w
use Win32::Registry;
my $Register ="Software";
#my $Register2=".DEFAULT\\Software";
my $hkey;
my @array= qw($HKEY_LOCAL_MACHINE $HKEY_CURRENT_USER ) ;

foreach (@array)
{
        $_=>Open($Register,$hkey)|| die $!;
        $hkey->DeleteKey("Cygwin2");
        $hkey->Close();
}

and i have this error:Undefined subroutine &main::Open called at $_=>...
Why?


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]