• You have a Perl script to "perform an FTP". Are you downloading something via FTP, or are you uploading?
• You 'execute it'. Does 'it' refer to the perl script?
• You try to delete 'it'. Does 'it' refer to the perl script?

It also does not delete any files; it does, however, try to move something.

What exactly are you trying to accomplish here?

I will not be able to help you until you answer at least some of these questions.

$"=$,,$_=q>|\p4<6 8p<M/_|<('=>
.q>.<4-KI<l|2$<6%s!<qn#F<>;$,
.=pack'N*',"@{[unpack'C*',$_]
}"for split/</;$_=$,,y[A-Z a-z]
         {}cd;print lc
[download]