Greetings! Thank you for your response. Since you mentioned small digital clocks based on Tk; here is another one, even simpler than the first. It is based on the Tk::StrfClock module. All of about 6 lines of code to get it going, it generates a small Tk Widget with date and time.

Here is the code, very simple. Enjoy!

#!/usr/bin/perl -w
use Tk;
use Tk::StrfClock;
my $top=MainWindow->new();
    $top->StrfClock()->pack();
    MainLoop();
[download]