Re: Use of uninitialized value in string eq ERROR
At 04:58 PM 1/15/2006 -0500, Eric Amick wrote: >Count your braces. The right brace immediately above this if statement >closes the scope of your "my" variable, so the $missingPatch in the if >is a different (and obviously uninitialized) variable. I cleaned up the code he posted and made it executable. There is no brace above his my statement so that variable cannot go out of scope. I ran his code and the $missingPatch variable ended up as "yes". So something else is wrong somewhere where he didn't post the code. -- REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=-- "...ne cede malis" 0100 ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Use of uninitialized value in string eq ERROR
On Sun, 15 Jan 2006 12:05:08 -0800, you wrote:
>my $missingPatch = "no";
>foreach $patch (@patches)
>{
>$showrev = `showrev -p | grep \"Patch: $patch\"`;
>if ( length ($showrev) == 0 ) # meaning the patch isn't installed
>{
> ...
>if ( exists $installedPatch[1] )
>{($instPatchID, $instPatchVer) = split(/-/,
>$installedPatch[1]); }
>
>if ( ( exists $patchName[1] ) && ($patchName[1] lt $instPatchVer
>) )
>{
>
>}
>else
>{
> ..
> $missingPatch = "yes";
>}
>}
>}
>if ( $missingPatch =~ m/yes/ ) --- > this is where the error occurs.
Count your braces. The right brace immediately above this if statement
closes the scope of your "my" variable, so the $missingPatch in the if
is a different (and obviously uninitialized) variable.
--
Eric Amick
Columbia, MD
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Use of uninitialized value in string eq ERROR
First fix ur line breaks!
At 10:02 AM 1/15/2006 +0200, eyal edri wrote:
}
>if ( $missingPatch =~ m/yes/ ) --- > this is where the error occurs.
>(i've tried also $missingPatch eq 1) or '1' or "1" ... .
>{ .. }
>
>I can't understand why perl shouts about this, since this var has been
>initialized.
>(also tried removing use strict)
>
>thanks,
>
>Eyal Edri | System &
Put in a line to print the current value of $missingPatch just before this
stage so that u can see what Perl is going to compare. Also, before the
print, check for definedness e.g. defined $missingPatch ? print
"\$missingPatch is defined" : print "\$missingPatch is NOT defined";
--
REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=--
"...ne cede malis"
0100
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Use of uninitialized value in string eq ERROR
Hello,I keep getting this error and it drive me nuts. ('Use of uninitialized value in string eq' )i'll add a snippet from my code which produces this error:
use warnings;use File::Copy qw(copy);use Net::Domain qw(hostname hostfqdn hostdomain);use File::chmod;use Config::IniFiles;use File::Remove qw(remove);
my $missingPatch = "no"; foreach $patch (@patches) { $showrev = `showrev -p | grep \"Patch: $patch\"`; if ( length ($showrev) == 0 ) # meaning the patch isn't installed
{ ... if ( exists $installedPatch[1] ) { ($instPatchID, $instPatchVer) = split(/-/, $installedPatch[1]); } if ( ( exists $patchName[1] ) && ($patchName[1] lt $instPatchVer ) )
{ } else { .. $missingPatch = "yes";
} } }if ( $missingPatch =~ m/yes/ ) --- > this is where the error occurs. (i've tried also $missingPatch eq 1) or '1' or "1" ... .
{ .. } I can't understand why perl shouts about this, since this var has been initialized. (also tried removing use strict)thanks, Eyal Edri | System & Security Engineer |
[EMAIL PROTECTED] Communication.
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
