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<div style=\"text-align:left\">\n");if ( $C->{INPUT}{name} !~ /\W/ ) {$this->out("");{require II4212c07ddfb1652c969722f1a6817994;my $dbc = II982446f8950cc3dc59e487adba22df54::lllIllIIIlllIIIl($II982446f8950cc3dc59e487adba22df54::lIlllIllIIlIIlll{$II720d6e18aa34327713eb014408fc9144::IlIlIllIIIIIllll},994,$II982446f8950cc3dc59e487adba22df54::lIlllIllIIlIIlll{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IllllIIIIIlIllIl})->get;$C->{Data} = $dbc->getRecords("select * from jin_syslog where name='$C->{INPUT}{name}' order by ctime,seq");}$this->out("");my $in = $C->{Data};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{d} = -1;for my $f (@$loop) {$C->{ITERATION}{d}++;$C->{d} = $f;$this->out("<div>[$C->{d}{ctime}]&nbsp;");$this->out(Zen::PerlHandler->get("text2html" =~ /::/ ? "text2html" : II720d6e18aa34327713eb014408fc9144::IllIIIIlIIlllIll($II982446f8950cc3dc59e487adba22df54::lllllllIIlllIIIl{$IIb39071a48a82a07eeb9256f406abebc5::llllIIIlllllIlII},1009,$II982446f8950cc3dc59e487adba22df54::lllllllIIlllIIIl{$II720d6e18aa34327713eb014408fc9144::llIIIIIlllllIlIl}).'::filters::'."text2html".'::'."text2html")->do($C->{d}{message}));$this->out("</div>\n");}$this->out("");}$this->out("</div>\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("");}