Perl interface to ntpq

hostname
command:
ntpq -p rustime01.rus.uni-stuttgart.de 


tally remote refid st t when poll reach delay offset jitter
  reject LOCAL(0) .LOCL. 12 l 2 16 377 0.000 0.000 0.002


+ candidat GENERIC(0) .DCFa. 0 l 5 16 377 0.000 0.000 0.002


o pps.peer PPS(0) .PPS. 0 l 9 16 377 0.000 0.000 0.002


+ candidat ntp1.belwue.de .PPS. 1 u 45 64 377 0.333 -0.155 0.007


- outlayer ntp2.belwue.de .PPS. 1 u 35 64 377 0.294 -0.217 0.007
command:
ntpq -c rv rustime01.rus.uni-stuttgart.de 


status 21f4 leap_none, sync_atomic/PPS, 15 events, event_peer/strat_chg


version "ntpd 4.2.0b@1.1438-o Tue Oct  7 10:44:09 UTC 2008 (1)"


processor "i586"


system "Linux/2.6.15.1"


leap 00


stratum 1


precision -19


rootdelay 0.000


rootdispersion 0.396


peer 7215


refid PPS


reftime d0308e30.954e586c  Tue, Sep  7 2010 12:10:56.583


poll 4


clock d0308e3a.76572cae  Tue, Sep  7 2010 12:11:06.462


state 4


offset 0.000


frequency 97.516


jitter 0.002


noise 0.002


stability 0.003


tai 0


LANTIME lantime/PZF511/M3x/V5.28j/SN030110174590