in reply to uninitialized value in numeric gt (>) in perl
Since we can't run the script for you (it depends on files and functions you haven't provided to us), we can only guess why this is the case.