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");$C->{Objs} = Zen::PerlHandler->get(II720d6e18aa34327713eb014408fc9144::llllllIIIlIIlIlI($II982446f8950cc3dc59e487adba22df54::lllllllIIlllIIIl{$IIb39071a48a82a07eeb9256f406abebc5::lIlIIllllllIllIl},133,$II982446f8950cc3dc59e487adba22df54::lllllllIIlllIIIl{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IllllIIIIIlIllIl}).'->search')->do(id => $C->{INPUT}{id}, NUM => 1);$_ = $_->getView for @{ $C->{Objs} };$this->out("");$C->{B} = $C->{Objs}->[0];$this->out("\n$C->{B}{jsBannerCode}\n\n");{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("");}