NAME

Apache::SWIT - mod_perl based application server with integrated testing.

SYNOPSIS

package MyHandler;
use base 'Apache::SWIT';

# overload render routine
sub swit_render {
	my ($class, $r) = @_;
	return ({ hello => 'world' }, 'my_template.tt');
	# or return { hello => 'world' }; to rely on swit.yaml
	# based generation
}

# overload update routine, usually result of POST
sub swit_update {
	my ($class, $r) = @_;
	# do some work ...
	# and redirect to another page
	return '/redirect/to/some/url';
}

DISCLAIMER

This is pre-alpha quality software. Please use it on your own
risk.

DESCRIPTION

This module serves as yet another mod_perl based application server.

It tries to capture several often occuring paradigms in mod_perl development. It provides user with the tools to bootstrap a new project, write tests easily, etc.

METHODS

$class->swit_send_http_header($r, $ct)

Sends HTTP default headers: session cookie and content type. $r is apache request and $ct is optional content type (defaults to text/html; charset=utf-8.

Dies with $msg using Carp::confess and dumps request $r and @data_to_dump with Data::Dumper.

BUGS

Much needed documentation is non-existant at the moment.

AUTHOR

Boris Sukholitko
boriss@gmail.com

COPYRIGHT

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

The full text of the license can be found in the LICENSE file included with this module.

SEE ALSO

HTML::Tested