Perl Basic Networking | TCPServer/Client

I will be showing you how to make basic TCP Clients and Servers in Perl with some basic interactivity.

Code for Server: http://pastebin.com/u2hj94XS
Code for Client: http://pastebin.com/4n9jjVyi