Drogo. Framework de Web Leve
Baixe Agora

Drogo. Classificação e resumo

Drogo. Tag

rede estrutura Módulo Perl. perl Framework da Web

Drogo. Descrição

Drogo é uma estrutura de web perl leve.synopsiskick-iniciar um projeto: drogo --create = orapp.psgi: use drogo :: server :: psgi; Use Exemplo :: App; Meu $ App = Sub {My $ Env = Shift; retorno sub {my $ responder = turno; # Criar novo objeto de servidor Meu $ Server = Drogo :: Server :: PSGI-> NOVO (ENV => $ Env, responder => $ responder); Exemplo :: App-> Handler (Server => $ Server); }}; Exemplo / app.pm: Pacote Exemplo :: App; Use rigoroso; use drogo :: despacho (auto_import => 1); subit init {my $ self = shift; $ auto -> {foo} = 'bar'; } Sub primário: index {my $ self = shift; # $ self-> r é um objeto de resposta compartilhada / requetet # $ self-> Solicitar / req dá um objeto de solicitação # $ self-> Resposta / res dá um objeto de resposta # $ self-> Dispatcher retorna o objeto drogo # $ > Servidor é um objeto do servidor $ auto-> r-> cabeçalho ('texto / html'); # Padrão $ auto-> r-> status (200); # padrões para 200 de qualquer maneira $ auto-> r-> imprimir ('Bem-vindo!'); $ auto-> r-> imprimir (q ); $ self-> r-> destacam; # pare qualquer despacho agora e saia} # referenciado por / foo sub foo: ação {my $ self = shift; Meu $ Stuff = $ Self-> R-> Param ('coisas'); $ auto-> r-> imprimir ('Howdy!'); } Sub stream_this: ação {my $ self = shift; # parada despachante $ auto-> despachante-> despacho (0); $ auto-> Server-> Header_out ('ETAG' => 'FAKEETAG'); $ auto-> Server-> Header_out ('Cache-Control' => 'Public, Max Idade = 31536000'); $ auto-> server-> send_http_header ('texto / html'); $ Self-> Server-> Imprimir ('Isso foi transmitido diretamente'); } # Referenciado por / moo / qualquer sub-moo: ActionMatch {My $ self = Shift; minhas @args = $ auto-> r-> correspondências; $ auto-> r-> imprimir ('Howdy:'. $ args ); } # Referenciado por / rei / tudo / cobra / qualquer sub-castores: ActionRegex ('king /(.*)/ cobra /(.*)') {my $ self = shift; Meus @args = $ auto-> combinações; $ auto-> r-> imprimir ("rugido: $ args , $ args "); }} Página inicial do produto

Drogo. Software Relacionado