Hi, just a minor thing. I downloaded your code and did a 
dos2unix conversion on it, and it gave an error near "have not"
on line 65.  It seems that you need a line feed after
$sender->SendLineEnc(<<"*END*");
It wouldn't be so bad, but the line is way off the screen and
can be confusing to find.