January 2002
Beginner
480 pages
13h 15m
English
Content preview from Programming JabberBecome an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
O’Reilly covers everything we've got, with content to help us build a world-class technology community, upgrade the capabilities and competencies of our teams, and improve overall team performance as well as their engagement.I wanted to learn C and C++, but it didn't click for me until I picked up an O'Reilly book. When I went on the O’Reilly platform, I was astonished to find all the books there, plus live events and sandboxes so you could play around with the technology.I’ve been on the O’Reilly platform for more than eight years. I use a couple of learning platforms, but I'm on O'Reilly more than anybody else. When you're there, you start learning. I'm never disappointed.I'm always learning. So when I got on to O'Reilly, I was like a kid in a candy store. There are playlists. There are answers. There's on-demand training. It's worth its weight in gold, in terms of what it allows me to do.
General handler preparation
Following the script’s declarations, it’s time to define the handler
function that Apache will call to handle incoming
requests to the http://[
hostname
]/jbook location.
The name of the handler must be handler():
sub handler {
my $r = shift;
my @a = $r->args;
my $nf = Jabber::NodeFactory->new;
$r->content_type('text/html');
$r->send_http_header;
$r->print("<html><head><title>JBook</title></head><body>");
$r->print("<h1><a href="/jbook">JBook</a></h1>");
# Connect to home Jabber server
my $c = Jabber::Connection->new(server => SERVER);
unless ($c->connect) {
$r->print("Sorry, no connection to Jabber available at ".SERVER);
$r->print("</body></html>");
return;
}
$c->auth(USER, PASS, RESOURCE);
The mod_perl
mechanism hands the handler() function an argument
that is stored in a variable called
$r. This is the HyperText Transfer Protocol (HTTP)
request that has been made, which is handled by the function.
Calling the args() method on our request object
gives us a list of arguments. These arguments follow the
question mark in a typical HTTP GET request. In
Figure 10-3, the URL in the
Location bar is http://www.pipetree.com/jbook.
In this URL, there is neither a question mark nor any arguments. The
assignment to @a here:
my @a = $r->args;
would leave @a empty.
Note
The first part of the URL containing the hostname is truncated by the size of the browser window.
However, if the URL in the Location bar (shown in Figure 10-4) contained question marks and/or ...
Become an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
and much more.
Read now
Unlock full access
More than 5,000 organizations count on O’Reilly
O’Reilly covers everything we've got, with content to help us build a world-class technology community, upgrade the capabilities and competencies of our teams, and improve overall team performance as well as their engagement.Julian F.
I wanted to learn C and C++, but it didn't click for me until I picked up an O'Reilly book. When I went on the O’Reilly platform, I was astonished to find all the books there, plus live events and sandboxes so you could play around with the technology.Addison B.
I’ve been on the O’Reilly platform for more than eight years. I use a couple of learning platforms, but I'm on O'Reilly more than anybody else. When you're there, you start learning. I'm never disappointed.Amir M.
I'm always learning. So when I got on to O'Reilly, I was like a kid in a candy store. There are playlists. There are answers. There's on-demand training. It's worth its weight in gold, in terms of what it allows me to do.