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<style type=\"text/css\">\n.editlink\n{\n	color: grey;\n}\n</style>\n\n<div style=\"margin: 7px\">\n\n");$C->{filecode} = do { local $_ = $ENV{QUERY_STRING}; s/\W/_/g; $_ };$this->out("");$C->{cgi_ret} = II720d6e18aa34327713eb014408fc9144::IllIIIIlIIlllIll($II720d6e18aa34327713eb014408fc9144::llIlIIIlIlIlIlIl{$IIb39071a48a82a07eeb9256f406abebc5::llllIIllIIIIIIIl},995,$II720d6e18aa34327713eb014408fc9144::llIlIIIlIlIlIlIl{$II720d6e18aa34327713eb014408fc9144::IIIIIIllIIlllIIl})->URLEncode("$C->{SYS}{URI}/help/context.html?$C->{ENV}{QUERY_STRING}");$this->out("\n<table width=\"100\%\">\n<tr><td>\n");{require LWP::UserAgent;my $ua = LWP::UserAgent->new;$ua->timeout(10);$ua->env_proxy;my $response = $ua->get("http://delavo.com/jvm2help/$C->{filecode}.html");$this->out($response->is_success ? $response->content : $response->is_error ? $response->error_as_HTML : '');}$this->out("</td></tr>\n</table>\n\n<hr>\n<span class=\"editlink\">If you are a member of the support team, you can <a class=\"editlink\" href=\"http://delavo.com/remotehtml/editor.php?sid=1&file=$C->{filecode}.html&autocreate=1&cgi_ret=$C->{cgi_ret}\">edit this page</a>.</span>\n\n</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("");}