#!/usr/bin/perl

use MyServer;
my $server = MyServer -> new({'localport'=>'1234', 
                                 'pidfile' =>'/home/tvix/server.pid',
                                  }, \@ARGV);

$server->Bind();