Perl interface to ntpq

hostname
command:
ntpq -p mizbeaver.udel.edu
tally remote refid st t when poll reach delay offset jitter
* sys.peer LOCAL(0) .GPS. 0 - 12 64 377 0.000 0.000 0.000
reject 66.243.43.14 0.0.0.0 16 u - 64 0 0.000 0.000 0.000
reject 66.243.43.15 0.0.0.0 16 u - 64 0 0.000 0.000 0.000
command:
ntpq -c rv mizbeaver.udel.edu
status 05e3 leap_none, sync_local_proto, 14 events, event_sync_chg
processor "unknown"
system "arm-wrs-vxworks"
leap 00
stratum 1
precision -9
rootdelay 0.000
rootdispersion 3.617
peer 37732
refid GPS
reftime d02e862b.03a5e353 Sun, Sep 5 2010 23:12:11.014
poll 6
clock d02e863c.71db22d0 Sun, Sep 5 2010 23:12:28.444
state 4
phase 0.000
frequency 0.000
jitter 0.000
stability 0.000