"But for some reason it is not going into the if condition today and am really appalled by so little support in perl by the module owners."
You state that today is the first day you are having problems. So you expect support within the space of a day, Keeping in mind the the module owner/maintainer may yet have no idea you're having problems? What have you done to bring this to their attention? What makes you think it's a problem with their module and not your code or the sites you're interacting with? Why are you appalled? What level of service do you expect or deem acceptable from the module authors? How much are you paying for this support?
Update: If as you claim this has worked until today, clearly something has change, either your code, or the data.