/usr/lib/perl5/Net/Jabber/Loudmouth.pm is in libnet-jabber-loudmouth-perl 0.07-2build2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 | package Net::Jabber::Loudmouth;
use strict;
use warnings;
use Glib;
require DynaLoader;
our @ISA = qw(DynaLoader);
our $VERSION = 0.07;
our $DefaultPort = 5222;
our $DefaultPortSSL = 5223;
sub default_port { return $DefaultPort; }
sub default_port_ssl { return $DefaultPortSSL; }
sub dl_load_flags { 0x01 };
bootstrap Net::Jabber::Loudmouth $VERSION;
# Preloaded methods go here.
1;
__END__
=head1 NAME
Net::Jabber::Loudmouth - Perl interface for the loudmouth jabber library
=head1 SYNOPSIS
use Net::Jabber::Loudmouth;
my $connection = Net::Jabber::Loudmouth::Connection->new("server");
$connection->open_and_block();
$connection->authenticate_and_block("username", "password", "resource");
my $m = Net::Jabber::Loudmouth::Message->new("recipient", 'message');
$m->get_node->add_child("body", "message");
$connection->send($m);
=head1 DESCRIPTION
Net::Jabber::Loudmouth is a perl interface for libloudmouth, Lightweight C
Jabber library. It allows you to do the same stuff with Net::Jabber, but with a
nicer interface and much faster, because most of the code is written in C.
=head1 FUNCTIONS
B<Net::Jabber::Loudmouth> only contains two functions. Other functionality can
be found in B<Net::Jabber::Loudmouth::*>.
=head2 default_port
Net::Jabber::Loudmouth->default_port()
Returns the default port which will be used for every connection.
=head2 default_port_ssl
Net::Jabber::Loudmouth->default_port_ssl()
Returns the default ssl port. Use
$connection->set_port(Net::Jabber::Loudmouth->default_port_ssl())
to tell a connection to use the ssl port. See
L<Net::Jabber::Loudmouth::Connection>.
=head1 SEE ALSO
Net::Jabber::Loudmouth::Connection, Net::Jabber::Loudmouth::Message,
Net::Jabber::Loudmouth::MessageHandler, Net::Jabber::Loudmouth::MessageNode,
Net::Jabber::Loudmouth::SSL, Net::Jabber::Loudmouth::Proxy
=head1 AUTHOR
Florian Ragwitz, E<lt>rafl@debian.orgE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (C) 2005 by Florian Ragwitz
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.8.7 or,
at your option, any later version of Perl 5 you may have available.
=cut
|