use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");{my $G = (ref $this)->get("/help/tagshelp/tags_coupon.html", $this->{param}) or die "no skel /help/tagshelp/tags_coupon.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");}