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-Unix-Users mailing list
Perl-Unix-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to