my $port = 8080;
my $ip = '192.168.1.1';
my $sockaddr = pack_sockaddr_in($port, inet_aton($ip));