- my ($out, $response) = Net::SSLeay::get_http( 'dynserv.ca',
- 80,
- "/dyn/dynengine.cgi?func=set&name=$settings{'LOGIN'}&pass=$settings{'PASSWORD'}&ip=$ip&domain=$settings{'DOMAIN'}",
+ my ($out, $response) = Net::SSLeay::get_https( 'api.dynu.com',
+ 443,
+ "/nic/update?hostname=$settings{'HOSTDOMAIN'}&myip=$ip&username=$settings{'LOGIN'}&password=$settings{'PASSWORD'}",