From ae1ef4f15034fad5792e86c04cbb292defd94617 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 2 Aug 2001 11:41:10 +0000 Subject: update ntp servers list --- tools/ntp_servers.pl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'tools/ntp_servers.pl') diff --git a/tools/ntp_servers.pl b/tools/ntp_servers.pl index ccd470f42..62640557c 100644 --- a/tools/ntp_servers.pl +++ b/tools/ntp_servers.pl @@ -3,7 +3,12 @@ open F, "links -dump http://www.eecis.udel.edu/~mills/ntp/clock1.htm|"; open G, "links -dump http://www.eecis.udel.edu/~mills/ntp/clock2.htm|"; -parse() while ; +# Chris Kloiber writes: +# > It's not considered polite to use the Stratum 1 servers for purposes that +# > are not absolutely critical. I would use Stratum 2 servers and live with +# > the few nanoseconds difference. +#parse() while ; + parse() while ; sub parse { @@ -42,7 +47,7 @@ foreach (grep { $_->{policy} eq 'open access' } @all) { ($country, $state) = split ' ', $_->{indic}; $country = ucfirst(lc $country_codes{$country}); $country .= " $state" if $state; - print lc($_->{name}), " $country\n"; + print "$country (", lc($_->{name}), ")\n"; } BEGIN { -- cgit v1.2.1