use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");{my $G = (ref $this)->get("/headfoot/ext_header.html", $this->{param}) or die "no skel /headfoot/ext_header.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("\n");if ( $C->{TStamp} ) {$this->out("<div align=\"right\" style=\"font-size: 80\%; padding: 10px\">last update: $C->{TStamp}</div>\n");}$this->out("\n<center>\n");$C->{INPUT}{report} = "top_aff_amo_sale";$this->out("");{my $G = (ref $this)->get("/master/tools/stats/tracker.html", $this->{param}) or die "no skel /master/tools/stats/tracker.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("</center>\n\n");{my $G = (ref $this)->get("/headfoot/ext_footer.html", $this->{param}) or die "no skel /headfoot/ext_footer.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");}