Perl in a Nutshell, 2nd Edition

CGI::Push

Provides an interface to do server push operations, letting you rewrite pages with content that changes regularly. A server push operation automatically sends updates to a page on a push-capable browser. CGI::Push exports the function do_push to implement page redraws. This method can be used on a CGI::Push object or on its own:

$q = new CGI::Push;
$q->do_push(-next_page => \&sub);

or:

do_push (-next_page => \&sub);

do_push requires one argument: a reference to a subroutine that will draw the next page. You may optionally specify a subroutine that draws the last page and the interval between page updates. Additional parameters to do_push are those that can be used with a CGI::headers object.