"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."
Wait, you contacted them about your code not working today and they haven't fixed it for you yet? That's disgraceful! The support contract and maintenance you pay for states that... oh what, forget it. I notice there are zero open bugs listed in the RT queue.
Consider debugging this yourself rather than being appalled with anyone else, it's a more productive use of effort. If you find a genuine problem consider actually reporting it.