System error

error:  Cannot define a once section inside a method or subcomponent at /srv/jbovlaste/current/wiki/Search line 5
context: 
1:  <%method title>
2:  Wiki: Search
3:  </%method title>
4: 
5:  <%once>
6:  use utils;
7:  </%once>
8: 
9:  % if(defined($search)) {
... 
code stack:  /usr/share/perl5/vendor_perl/HTML/Mason/Compiler.pm:275
/usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm:170
/usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm:121
/usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm:355
/usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm:123
/usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm:99
/usr/share/perl5/vendor_perl/HTML/Mason/Compiler.pm:217
/usr/share/perl5/vendor_perl/HTML/Mason/Compiler/ToObject.pm:85
/usr/share/perl5/vendor_perl/HTML/Mason/Compiler/ToObject.pm:124
/usr/share/perl5/vendor_perl/HTML/Mason/Interp.pm:437
/usr/share/perl5/vendor_perl/HTML/Mason/Request.pm:250
/usr/share/perl5/vendor_perl/HTML/Mason/Request.pm:212
/usr/share/perl5/vendor_perl/HTML/Mason/ApacheHandler.pm:97
/usr/share/perl5/vendor_perl/Class/Container.pm:275
/usr/share/perl5/vendor_perl/Class/Container.pm:353
/usr/share/perl5/vendor_perl/HTML/Mason/Interp.pm:348
/usr/share/perl5/vendor_perl/HTML/Mason/ApacheHandler.pm:868
/usr/share/perl5/vendor_perl/HTML/Mason/ApacheHandler.pm:822
(eval 27):8
-e:0
raw error






























Cannot define a once section inside a method or subcomponent at /srv/jbovlaste/current/wiki/Search line 5

Trace begun at /usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm line 567
HTML::Mason::Lexer::throw_syntax_error('HTML::Mason::Lexer=HASH(0x7fd80c018808)', 'Cannot define a once section inside a method or subcomponent') called at /usr/share/perl5/vendor_perl/HTML/Mason/Compiler.pm line 275
HTML::Mason::Compiler::start_block('HTML::Mason::Compiler::ToObject=HASH(0x7fd80c018820)', 'block_type', 'once') called at /usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm line 170
HTML::Mason::Lexer::match_block('HTML::Mason::Lexer=HASH(0x7fd80c018808)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm line 121
HTML::Mason::Lexer::start('HTML::Mason::Lexer=HASH(0x7fd80c018808)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm line 355
HTML::Mason::Lexer::match_named_block('HTML::Mason::Lexer=HASH(0x7fd80c018808)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm line 123
HTML::Mason::Lexer::start('HTML::Mason::Lexer=HASH(0x7fd80c018808)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm line 99
eval {...} at /usr/share/perl5/vendor_perl/HTML/Mason/Lexer.pm line 97
HTML::Mason::Lexer::lex(undef, 'comp_source', 'SCALAR(0x7fd7e4011820)', 'name', '/srv/jbovlaste/current/wiki/Search', 'compiler', 'HTML::Mason::Compiler::ToObject=HASH(0x7fd80c018820)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Compiler.pm line 217
HTML::Mason::Compiler::compile(undef, 'comp_path', '/wiki/Search', 'comp_source', 'SCALAR(0x7fd7e4011820)', 'name', '/srv/jbovlaste/current/wiki/Search', 'fh', 'GLOB(0x7fd80ce77cc0)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Compiler/ToObject.pm line 85
HTML::Mason::Compiler::ToObject::compile('HTML::Mason::Compiler::ToObject=HASH(0x7fd80c018820)', 'comp_source', 'SCALAR(0x7fd7e4011820)', 'name', '/srv/jbovlaste/current/wiki/Search', 'comp_class', 'HTML::Mason::Component::FileBased', 'comp_path', '/wiki/Search', 'fh', 'GLOB(0x7fd80ce77cc0)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Compiler/ToObject.pm line 124
HTML::Mason::Compiler::ToObject::compile_to_file(undef, 'file', '/tmp/mason-data-dir/obj/3352485405/jbovlaste/wiki/Search.obj', 'source', 'HTML::Mason::ComponentSource=HASH(0x7fd80d02d890)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Interp.pm line 437
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0x7fd80c018910)', '/wiki/Search') called at /usr/share/perl5/vendor_perl/HTML/Mason/Request.pm line 250
eval {...} at /usr/share/perl5/vendor_perl/HTML/Mason/Request.pm line 232
HTML::Mason::Request::_initialize('HTML::Mason::Request::ApacheHandler=HASH(0x7fd7e4011130)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Request.pm line 212
HTML::Mason::Request::new('HTML::Mason::Request::ApacheHandler', 'error_mode', 'output', 'error_format', 'html', 'interp', 'HTML::Mason::Interp=HASH(0x7fd80c018910)', 'comp', '/wiki/Search', 'args', 'ARRAY(0x7fd7e40c0c40)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fd80c00dff8)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)', 'container', 'HASH(0x56086a07c2d0)') called at /usr/share/perl5/vendor_perl/HTML/Mason/ApacheHandler.pm line 97
HTML::Mason::Request::ApacheHandler::new('HTML::Mason::Request::ApacheHandler', 'error_mode', 'output', 'error_format', 'html', 'interp', 'HTML::Mason::Interp=HASH(0x7fd80c018910)', 'comp', '/wiki/Search', 'args', 'ARRAY(0x7fd7e40c0c40)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fd80c00dff8)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)', 'container', 'HASH(0x56086a07c2d0)') called at /usr/share/perl5/vendor_perl/Class/Container.pm line 275
Class::Container::call_method('HTML::Mason::Interp=HASH(0x7fd80c018910)', 'request', 'new', 'interp', 'HTML::Mason::Interp=HASH(0x7fd80c018910)', 'comp', '/wiki/Search', 'args', 'ARRAY(0x7fd7e40c0c40)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fd80c00dff8)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)', 'container', 'HASH(0x56086a07c2d0)') called at /usr/share/perl5/vendor_perl/Class/Container.pm line 353
Class::Container::create_delayed_object(undef, undef, 'interp', 'HTML::Mason::Interp=HASH(0x7fd80c018910)', 'comp', '/wiki/Search', 'args', 'ARRAY(0x7fd7e40c0c40)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fd80c00dff8)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)', 'container', 'HASH(0x56086a07c2d0)') called at /usr/share/perl5/vendor_perl/HTML/Mason/Interp.pm line 348
HTML::Mason::Interp::make_request('HTML::Mason::Interp=HASH(0x7fd80c018910)', 'comp', '/wiki/Search', 'args', 'ARRAY(0x7fd7e40c0c40)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fd80c00dff8)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)') called at /usr/share/perl5/vendor_perl/HTML/Mason/ApacheHandler.pm line 868
eval {...} at /usr/share/perl5/vendor_perl/HTML/Mason/ApacheHandler.pm line 867
HTML::Mason::ApacheHandler::prepare_request('HTML::Mason::ApacheHandler=HASH(0x7fd80c00dff8)', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)') called at /usr/share/perl5/vendor_perl/HTML/Mason/ApacheHandler.pm line 822
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7fd80c00dff8)', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)') called at (eval 27) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7fd7d000cba8)') called at -e line 0
eval {...} at -e line 0