Re^4: Duplicity Check Help!

in reply to Re^3: Duplicity Check Help!
in thread Duplicity Check Help!

It makes sense what you said, but the issue is on these lines

        if(($row->{image_name_1} ne "") eq ($pics[0] ne "")){$flag_pic
++=1;}
        if(($row->{image_name_2} ne "") eq ($pics[1] ne "")){$flag_pic
++=1;}
        if(($row->{image_name_3} ne "") eq ($pics[2] ne "")){$flag_pic
++=1;}
        if(($row->{image_name_4} ne "") eq ($pics[3] ne "")){$flag_pic
++=1;}
[download]

It is not considering the equality, even if the images are not a match it is still incrementing $flag_pic+=1.

Comment on Re^4: Duplicity Check Help! Download Code

Replies are listed 'Best First'.
Re^5: Duplicity Check Help! by wallisds (Beadle) on Dec 02, 2010 at 17:26 UTC
Oh. I'm sorry. I see what you mean. If flag_pic is incremented every time, do me a favor and run this: `if(($row->{image_name_1} ne "") eq ($pics[0] ne "")){ print "IMG NAME is '$image_name_1'\n"; print "PICS-0 is '$pics[0]'\n"; $flag_pic+=1; }` [download] This will help in troubleshooting because I am not sure what values to expect for these two variables. Right now you are checking to see: 1. if the image name is not equal to '' (empty string) AND 2. if the pic is not equal to '' (empty string) Am I correct in my understanding that `$pic[x] #(where x is 0-3)` will not usually be an empty string because it's the file the user is trying to upload? Maybe you want to change your if to evaluate against the image name compared to the picture name?	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^5: Duplicity Check Help!
by wallisds (Beadle) on Dec 02, 2010 at 17:26 UTC

Oh. I'm sorry. I see what you mean. If flag_pic is incremented every time, do me a favor and run this:

if(($row->{image_name_1} ne "") eq ($pics[0] ne "")){
print "IMG NAME is '$image_name_1'\n";
print "PICS-0 is '$pics[0]'\n";
$flag_pic+=1;
}
[download]

This will help in troubleshooting because I am not sure what values to expect for these two variables. Right now you are checking to see:
1. if the image name is not equal to '' (empty string)
AND
2. if the pic is not equal to '' (empty string)
Am I correct in my understanding that $pic[x] #(where x is 0-3) will not usually be an empty string because it's the file the user is trying to upload?
Maybe you want to change your if to evaluate against the image name compared to the picture name?

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom