Perl interface to ntpq

hostname
command:
ntpq -p elproma.com.pl
tally remote refid st t when poll reach delay offset jitter
command:
ntpq -c rv elproma.com.pl