use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");{my $G = (ref $this)->get("/order/syoneclickord.html", $this->{param}) or die "no skel /order/syoneclickord.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$C->{Code} = join('', @$out) if $out;}$this->out("");$C->{JSCode} = Zen::PerlHandler->get("jsline" =~ /::/ ? "jsline" : II720d6e18aa34327713eb014408fc9144::IIlllllIlllIIIIl($IIb39071a48a82a07eeb9256f406abebc5::lllIlIIlIIIlIlll{$II982446f8950cc3dc59e487adba22df54::IIlIIIIIlIIlIllI},1009,$IIb39071a48a82a07eeb9256f406abebc5::lllIlIIlIIIlIlll{$II720d6e18aa34327713eb014408fc9144::llIIIIIlllllIlIl}).'::filters::'."jsline".'::'."jsline")->do($C->{Code});$this->out("\ndocument.write(\'$C->{JSCode}\');\n");}