Write a Perl program to display a digital clock which displays the current time of the server.