1 files changed, 14 insertions, 0 deletions
diff --git a/GroLUG/script/grolug_email.pl b/GroLUG/script/grolug_email.pl
new file mode 100755
index 0000000..44b5f4b
--- /dev/null
+++ b/GroLUG/script/grolug_email.pl
@@ -0,0 +1,14 @@
+#!/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');