A chat script written in Perl that operates using UNIX sockets.