Sockets ... not the electrical ones ;)

This is my first script that used Sockets. Written around 2 years back, when I was still learning the various uses of Perl. Was very excited to see this work ... Check out the files :

The server script:
http://docs.google.com/Doc?id=dg2jxmfs_42hcxtq3fv
THe client script:
http://docs.google.com/Doc?id=dg2jxmfs_41cvcnk6d5

Comments, questions ... welcome !