Programming Jabber

General handler close

Once we’ve dealt with the possible states, we send the closing HTML statements common to all three of them, and disconnect from the Jabber server:

  $r->print("</body></html>");
  $c->disconnect;

  return;

At this stage, there’s nothing more for the module to do. Having discerned the state from the arguments in the URL (and thereby the appropriate action) and having carried out that action, the module ends, handing control back to its mod_perl host. Remembering that Demo::JBook is an Apache handler in the form of a Perl module, we need to ensure that the module itself returns a true value (as with any Perl module):

}

1;