<% include('/elements/header-popup.html', "Ping $ip" ) %> <% include('/elements/xmlhttp.html', 'url' => $p. 'misc/xmlhttp-ping.html', 'subs' => [ 'ping' ], ) %> %# <%ntable("#cccccc", 2)%> Status Checking... Packet loss Latency Packets
<%init> my($query) = $cgi->keywords; $query =~ /^([\d\.]+)$/ or die 'Illegal IP'; my $ip = $1;