Wieso nimmst du Perl wenn du Function Calls wie system() benutzt? Das ist nicht nur total unsauber sondern auch absolut überflüssig, wenn du schon was mit Sockets machst.
Perl ist nicht dazu da um externe Tools wie wget zu wrappen... Programmier sowas lieber in Bash ...