Perl interface to ntpq

hostname
command:
ntpq -p clock.uregina.ca 


tally remote refid st t when poll reach delay offset jitter
* sys.peer GPS_ONCORE(0) .GPS. 0 l 17 16 377 0.000 -0.014 0.002


+ candidat time.nist.gov .ACTS. 1 u 49 64 377 77.751 12.364 0.895


+ candidat time.nrc.ca toc.nrc.ca 2 u 48 64 377 72.728 15.169 0.605


  reject SUE.CC.UREGINA.CA CLOCK.UREGINA.CA 2 u 345 1024 377 0.132 1.341 0.044


  reject mercury.cs.uregina.ca CLOCK.UREGINA.CA 2 u 91 256 366 0.496 1.248 0.206
command:
ntpq -c rv clock.uregina.ca 


status 04f4 leap_none, sync_uhf_clock, 15 events, event_peer/strat_chg


version "ntpd 4.2.0-a Mon Apr 10 07:49:53 CST 2006 (1)"


processor "i386"


system "FreeBSD/5.4-RELEASE-p13"


leap 00


stratum 1


precision -19


rootdelay 0.000


rootdispersion 0.552


peer 42308


refid GPS


reftime d02e8e69.375ad977  Sun, Sep  5 2010 23:47:21.216


poll 4


clock d02e8e6a.b9684b65  Sun, Sep  5 2010 23:47:22.724


state 4


offset -0.013


frequency 16.921


jitter 0.002


stability 0.000