Atomzeit

[Erwin]

hi,

Ich müste mal wissen, wie ich mir die Atomzeit der Braunschweiger Atomuhr besorgen kann und diese dann in einem Array oder in einer Variable Speichern kann.

Zeit vom Server holen

sub get_time{
 my $hostname = shift;
 use IO::Socket;
 my $client_sock = new IO::Socket::INET (
  PeerAddr => $hostname,
  PeerPort => 13,
  Proto    => 'tcp')|| return 0;

my $server_time = <$client_sock>;
 $client_sock->close();
 return "$server_time";
}

Erwin