Can't modify subroutine entry in scalar assignment at C:\Perl\lib/POSIX.pm line
3, near ");"
BEGIN not safe after errors--compilation aborted at C:\Perl\lib/POSIX.pm line 5. 
BEGIN failed--compilation aborted at ftp_Invent.pl line 11.