Parsen von HTML-Inhalten (gelöst) - #169312 (Allgemeines zu Perl)

hlubenow

2013-08-01 17:23

User since
2009-02-22
875 Artikel
BenutzerIn
[default_avatar]

So, hier nochmal ein Skript, mit dem man (hoffentlich) einigermaßen vernünftig die Uhrzeit mit Perl über NTP bekommt:

Code (perl): (dl )

#!/usr/bin/perl

use warnings;
use strict;

# Please read: http://www.pool.ntp.org/de/use.html

use Net::NTP;
my %h = get_ntp_response("0.pool.ntp.org");

my @t = localtime($h{"Transmit Timestamp"});

my $hours = sprintf("%02d", $t[2]);
my $minutes = sprintf("%02d", $t[1]);
my $seconds = sprintf("%02d", $t[0]);

print "$hours:$minutes:$seconds\n";