Perl interface to ntpq

hostname
command:
ntpq -p ntp0.jensenresearch.com 


tally remote refid st t when poll reach delay offset jitter
+ candidat ntps11.jensenresearch.com .CDMA. 1 - 443 1024 377 3.560 -0.485 0.080


- outlayer 172.21.0.226 172.21.0.14 2 - 385 1024 377 3.100 0.072 0.090


- outlayer 172.21.0.227 172.21.0.14 2 - 373 1024 377 3.100 0.066 0.120


+ candidat 172.22.0.71 172.21.0.13 2 - 266 1024 377 3.230 -0.401 0.370


+ candidat 172.21.0.13 .PPS. 1 u 465 1024 377 3.300 -0.325 0.310


* sys.peer 172.21.0.14 .PPS. 1 u 32 1024 377 3.220 -0.312 0.340


+ candidat min-time-02.inet.qwest.net min-time-01.inet.qwest.net 2 u 190 1024 377 36.620 -0.211 0.080
command:
ntpq -c rv ntp0.jensenresearch.com 


status 0600 leap_none, sync_ntp, no events, event_unspec


system "cisco"


leap 00


stratum 2


rootdelay 3.220


rootdispersion 1.110


peer 31111


refid 172.21.0.14


reftime d02e7e2b.6bb4ffbe  Sun, Sep  5 2010 22:38:03.420


poll 10


clock d02e7e4c.9a479ef8  Sun, Sep  5 2010 22:38:36.602


phase -0.335


freq 19.61


error 0.52