use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");{my $G = (ref $this)->get("/headfoot/inner_header.html", $this->{param}) or die "no skel /headfoot/inner_header.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("\n");$this->out(Zen::PerlHandler->get("II77114b714a39e42fc97ed5e1b40c0582->mnt_test")->do($this->{C}));$this->out("\n<div style=\"text-align: left; margin: 35px\">\nPlease check your mail client in some seconds. Open the test email\nmessage sent to your email $C->{Admin}{email} and verify that everything is\ncorrect before proceeding with the mass mail.\n</div>\n\n");{my $G = (ref $this)->get("/headfoot/inc_closewindow.html", $this->{param}) or die "no skel /headfoot/inc_closewindow.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");{my $G = (ref $this)->get("/headfoot/inner_footer.html", $this->{param}) or die "no skel /headfoot/inner_footer.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");}