Comparing 3 vars if defined.

[brittany1]

I have a scripting problem .. not sure where to start.

I will have 3 vars. They could or could not be defined. For any defined var, I need to check that the string is identical to other define vars.

So for example I could have :
$x=NOW IS THE TIME
$y=NOW IS THE TIME
$z=NOW IS THE TIME

OR
$x=NOW IS THE TIME
$y=
$z=Now ISnt THE TIME

or

$x=NOW IS THE TIME
$y=
$z=

or any other combination thinkable.

Thanks in advance

 

[audiopro]

Here is a simple solution but I expect there are others.

if(($x eq $y) && ($x eq $z)){
# They match
}

Keith

http://www.studiosoft.co.uk

 

[brittany1]

Thank Keith .. sheez .. now that I see it, it looks too easy ... should have been able to figure that out. Guess sometimes I just become blind ... cant "see" it ... thanks again.

 

[ChrisHunt]

The problem with audiopro's solution is that it only works when all three values are defined. As I understand it, you want to pick cases where all defined values are identical, and ignore undefined values. So the first and last of the three cases you listed should pass, whilst the middle one should fail.

I haven't tested it, but something like this should do:

if ((($x eq $y) || ($x eq '') || ($y eq ''))
 && (($x eq $z) || ($x eq '') || ($z eq ''))
 && (($y eq $z) || ($y eq '') || ($z eq ''))) then
   # They match
}

-- Chris Hunt
Webmaster & Tragedian
Extra Connections Ltd

 

[audiopro]

I assumed that the vars would be declared at the start of the script.
My latest offering would be.

my $x='';
my $y='';
my $z='';
if(($x ne '') && ($x) && ($y) && ($z) && ($x eq $y) && ($x eq $z)){
# They match
}

Keith

http://www.studiosoft.co.uk

 

[MillerH]

This should give you what you desire.

my @defined_vars = grep {defined $_} ($x, $y, $z);

if (@defined_vars && ! grep {$_ ne $defined_vars[0]} @defined_vars) {
    print "All Vars equal each other if they are defined\n";
}

The only special case that you didn't specify is what should happen if none of them are defined.

- Miller