Perl interface to ntpq

hostname
command:
ntpq -p ntp.shoa.cl
tally remote refid st t when poll reach delay offset jitter
command:
ntpq -c rv ntp.shoa.cl