fixed newline
cleaned code
perl udp client