Mercurial > pub > Impl
comparison Lib/IMPL/Web/Application.pm @ 166:4267a2ac3d46
Added Class::Template,
Rewritten SQL::Schema
'use parent' directive instead of 'use base'
author | wizard |
---|---|
date | Sat, 23 Apr 2011 23:12:06 +0400 |
parents | c5bc900eefd3 |
children | b88b7fe60aa3 |
comparison
equal
deleted
inserted
replaced
165:76515373dac0 | 166:4267a2ac3d46 |
---|---|
1 package IMPL::Web::Application; | 1 package IMPL::Web::Application; |
2 use strict; | 2 use strict; |
3 use warnings; | 3 use warnings; |
4 | 4 |
5 use base qw(IMPL::Config IMPL::Object::Singleton); | 5 use parent qw(IMPL::Config IMPL::Object::Singleton); |
6 | 6 |
7 require IMPL::Web::Application::Action; | 7 require IMPL::Web::Application::Action; |
8 require IMPL::Web::Application::Response; | 8 require IMPL::Web::Application::Response; |
9 | 9 |
10 use IMPL::Class::Property; | 10 use IMPL::Class::Property; |
93 $action->response->Complete(); | 93 $action->response->Complete(); |
94 } | 94 } |
95 } | 95 } |
96 | 96 |
97 package CGIWrapper; | 97 package CGIWrapper; |
98 use base qw(CGI); | 98 use parent qw(CGI); |
99 | 99 |
100 use Encode; | 100 use Encode; |
101 | 101 |
102 our $NO_DECODE = 0; | 102 our $NO_DECODE = 0; |
103 | 103 |
149 | 149 |
150 =end code | 150 =end code |
151 | 151 |
152 =head1 DESCRIPTION | 152 =head1 DESCRIPTION |
153 | 153 |
154 C< use base qw( IMPL::Config IMPL::Object::Singleton )> | 154 C< use parent qw( IMPL::Config IMPL::Object::Singleton )> |
155 | 155 |
156 Зкземпляр приложения содержит в себе глобальные настройки, реализует контроллер запросов, | 156 Зкземпляр приложения содержит в себе глобальные настройки, реализует контроллер запросов, |
157 в качестве источника запросов используется CGI или иной совместимый модуль. | 157 в качестве источника запросов используется CGI или иной совместимый модуль. |
158 | 158 |
159 Процесс обработки запроса состоит из следующих частей | 159 Процесс обработки запроса состоит из следующих частей |