[%USE O%][%USE this.plugin%][% USE Dumper %]
<h1>RVL::CpHandle Test</h1>
[% FOREACH k IN cpHandleList.keys.sort %]
<b>[% k %]:</b> [% this.plugin.callHandle(cpHandleList.$k) %]<br />
[% END %]
<p></p>
<h1>RVL::CpHandle::[% this.plugin.callHandle('getCpMode') %] Test</h1>
[% FOREACH k IN CPModeHandleList.keys.sort %]
<b>[% k %]:</b> [% this.plugin.callHandle(CPModeHandleList.$k) %]<br />
[% END %]
<p></p>
<h1>RVL::CpHandle::[% this.plugin.callHandle('getCpMode') %]::[% this.plugin.callHandle('getCpPrivilege') %] Test</h1>
[% FOREACH k IN handleList.keys.sort %]
<b>[% k %]:</b> [% this.plugin.callHandle(handleList.$k) %]<br />
[% END %]
<p></p>
<h1>Build Interface Code</h1>
<pre>
package RVL::CpHandle::CPModeInterface;
#@LICENSE@#
use Class::Std::Utils;
{
[% FOREACH k IN CPModeHandleList.keys.sort %] sub [% CPModeHandleList.$k %];
[% END %]}
1;
package RVL::CpHandle::PrivilegeInterface;
#@LICENSE@#
use Class::Std::Utils;
{
[% FOREACH k IN handleList.keys.sort %] sub [% handleList.$k %];
[% END %]}
1;
</pre>
Copyright 2K16 - 2K18 Indonesian Hacker Rulez