#!/usr/bin/perl

BEGIN {
    $ENV{CATALYST_ENGINE} ||= 'Null';
    $ENV{CATALYST_SCRIPT_GEN} = 27;
}
use strict;
use FindBin;
use lib "$FindBin::Bin/../lib";
use GroLUG;

my $c=GroLUG->prepare();
$c->{stats}=(GroLUG->debug) ? Tree::Simple->new() : '';
$c->forward('/iscritto/send_email');
