package Test;
 use Nginx::Simple;
 
 sub main # mandatory
 {
   my $self = shift;
 
   $self->header_set('Content-Type' => 'text/html');
   $self->print('rock on!');
 
   $self->log('I found a rabbit...');
 
   my $something = $self->param("here");
   $self->print("I found $something...");
 }
 
 # (optional) triggered after main runs
 sub cleanup
 {
   my $self = shift;
 
   # do stuff here---like clean database connections?
 }
 
 # (optional) triggered on a server error, otherwise it will return a standard nginx 500 error
 sub error
 {
   my $self = shift;
   my $error = shift;
   $self->status(500);
   $self->print("oh, uh, there is an error! ($error)");
 }