Perl interface to ntpq

hostname
command:
ntpq -p ntp0.cs.mu.OZ.AU
tally remote refid st t when poll reach delay offset jitter
reject LOCAL(0) LOCAL(0) 8 l 19 64 377 0.000 0.000 10.010
reject 203.31.84.4 0.0.0.0 16 u 337 1024 0 0.000 0.000 16000.0
reject ntp.central-data.net 0.0.0.0 16 u 348 1024 0 0.000 0.000 16000.0
- outlayer ntp.sydney.nmi.gov.au .ATOM. 1 u 586 1024 377 8.610 -1.103 2.940
reject ntp.melbourne.nmi.gov.au 0.0.0.0 16 u 270 1024 0 0.000 0.000 16000.0
- outlayer csiro-nml.physics.uwa.edu.au .ATOM. 1 u 435 1024 377 57.480 3.454 0.610
+ candidat ntp.adelaide.nmi.gov.au ntp.melbourne.nmi.gov.au 2 u 324 1024 377 38.740 0.649 0.500
reject 203.36.227.6 0.0.0.0 16 - - 1024 0 0.000 0.000 16000.0
+ candidat yarrina.connect.com.au csiro-nml.physics.uwa.edu.au 2 u 340 1024 377 13.060 1.402 1.740
* sys.peer holpin.connect.com.au csiro-nml.physics.uwa.edu.au 2 u 326 1024 377 12.500 -0.036 1.500
command:
ntpq -c rv ntp0.cs.mu.OZ.AU