Provided by: libnet-ntp-perl_1.3-1_all
NAME
Net::NTP - Perl extension for decoding NTP server responses
SYNOPSIS
use Net::NTP qw(get_ntp_response); my %response = get_ntp_response();
ABSTRACT
All this module does is send a packet to an NTP server and then decode the packet received into it's respective parts - as outlined in RFC1305 and RFC2030.
DESCRIPTION
This module exports a single method (get_ntp_response) and returns an associative array based upon RFC1305 and RFC2030. The response from the server is "humanized" to a point that further processing of the information received from the server can be manipulated. For example: timestamps are in epoch, so one could use the localtime function to produce an even more "human" representation of the timestamp. EXPORT get_ntp_response(<server>, <port>); This module exports a single method - get_ntp_response. It takes the server as the first argument (localhost is the default) and port to send/recieve the packets (ntp or 123 bu default). It returns an associative array of the various parts of the packet as outlined in RFC1305. It "normalizes" or "humanizes" various parts of the packet. For example: all the timestamps are in epoch, NOT hexidecimal.
SEE ALSO
perl, IO::Socket, RFC1305, RFC2030
AUTHOR
Now maintained by Ask BjA~Xrn Hansen, <ask@develooper.com<gt> Originally by James G. Willmore, <jwillmore (at) adelphia.net<gt> or <owner (at) ljcomputing.net<gt> Special thanks to Ralf D. Kloth <ralf (at) qrq.de<gt> for the code to decode NTP packets.
COPYRIGHT AND LICENSE
Copyright 2009 by Ask BjA~Xrn Hansen; 2004 by James G. Willmore This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.