view release on metacpan or  search on metacpan

lib/Apache/Mailtrack.pm  view on Meta::CPAN

=over 4

=item *

Install Apache::Mailtrack and all needed modules.

=item *

Create the a table in the database you want to use for logging which fits your needs.

For example:

  CREATE TABLE log
    (
    subscriberid       INTEGER        NOT NULL,
    newsletterid       INTEGER        NOT NULL,
    target             TEXT,
    view               TIMESTAMP      NOT NULL DEFAULT NOW()
    );

=item *

Set up a location in your Apache config as shown in B<SYNOPSIS>.

=item *

Set up a rewrite rule to catch the request which should be handled by Apache::Mailtrack.

For example:

  RewriteEngine On
  RewriteRule /Mailtrack/(.*)/(.*) /Mailtrack/?userdata=$1&target=$2 [P]

Replace C<Mailtrack> with the location you use.

=item *

Restart Apache.

=back


=head1 CONFIGURATION

You have to set up at least the following variables in your httpd.conf
in the location you want to use Apache::Mailtrack using PerlSetVar:

=over 4

=item I<db_dsn>

complete DBI connect string

=item I<db_user>

database user

=item I<db_pass>

password to be used

=item I<db_table>

name of table we should log to

=back


Additionally you can define the following options:

=over 4

=item I<db_target>

name of the field in the defined table (see db_table) we should write the redirection target to [default: C<undef>]

=item I<serializer>

name of the serializer Data::Serializer should use [default: C<Storable>]

=item I<secret>

specify secret for use with encryption [default: C<undef>]

=item I<path>

default path to the served file [default: C</images>]

=item I<defaultfile>

file we should serve in case of emergency [default: C<mailtrack_default.jpg>]

=back

=head1 AUTHOR

Florian Helmberger <fh@laudatio.com>

=head1 SEE ALSO

L<mod_perl>, L<Apache::Request>, L<Apache::Constants>, L<Data::Serializer>, L<YAML>, L<DBI>

=head1 VERSION

$Id: Mailtrack.pm,v 1.3 2003/02/03 12:14:57 florian Exp $

=head1 COPYRIGHT

Copyright (C) 2002 - 2003 Florian Helmberger. All Rights Reserved.
This module is free software. It may be used, redistributed and/or 
modified under the terms of the Perl Artistic License
(see http://www.perl.com/perl/misc/Artistic.html).

=cut