Jorge Goncalvez wrote:
>
> 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)
i don't know this windows module but i guess this should be it?
foreach $hkey (@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]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
