diff options
Diffstat (limited to 'cpan/CGI/examples/nph-clock.cgi')
-rw-r--r-- | cpan/CGI/examples/nph-clock.cgi | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/cpan/CGI/examples/nph-clock.cgi b/cpan/CGI/examples/nph-clock.cgi deleted file mode 100644 index f34fde27e9..0000000000 --- a/cpan/CGI/examples/nph-clock.cgi +++ /dev/null @@ -1,18 +0,0 @@ -#!/usr/local/bin/perl -w - -use CGI::Push qw(:standard :html3); - -do_push(-next_page=>\&draw_time,-delay=>1); - -sub draw_time { - my $time = localtime(); - return start_html('Tick Tock'), - div({-align=>CENTER}, - h1('Virtual Clock'), - h2($time) - ), - hr, - a({-href=>'index.html'},'More examples'), - end_html(); -} - |