Catalisador Catalyst é um módulo Perl que contém a elegante estrutura de aplicativo da Web MVC.
Baixe Agora

Catalisador Classificação e resumo

Catalisador Tag

rede Módulo Perl. Estrutura MVC MVC. Framework da Web Application. Catalisador

Catalisador Descrição

O Catalyst é um módulo Perl que contém a elegante estrutura de aplicativos da Web MVC. O Catalyst é um módulo Perl que contém o elegante MVC Web Application Framework.synopsissee A distribuição manual para documentação e tutoriais abrangentes. # Install Catalyst :: DEVEL para ajudantes e outras ferramentas de desenvolvimento # Use o ajudante para criar um novo aplicativo Catalyst.pl myapp # Adicionar modelos, visualizações, controladores Script / myapp_create.pl Modelo MyDatabase DBIC :: Schema Criar = dbi dinâmico: sqlite: / Path / to / db script / myapp_create.pl visualizar mytemplate tt script / myapp_create.pl busca de controlador # construído no testserver - use -r para reiniciar automaticamente em alterações # --help para ver todos os opções disponíveis script / myapp_server.pl # Script de interface de teste de linha de comando / myappp_test.pl / yada ### em lib / myapp.pm Use catalisador QW / -Debug /; # incluem plugins aqui também ### em lib / myapp / controller / root.pm (autocreated) sub foo: global {# chamado para / foo, / foo / 1, / foo / 1/2, etc. meu ($ auto, $ c, @args) = @_; # args são QW / 12 / para / foo / 1/2 $ c-> stash -> {modelo} = 'foo.tt'; # Definir o modelo # Pesquisar algo de DB - STASH VARS são passados para TT $ c-> stash -> {dados} = $ c-> modelo ('banco de dados :: foo') -> pesquisa ({country => $ args }); if ($ c-> req-> params -> {bar} {# Acessar Obter ou pós parâmetros $ c-> Forward ('bar'); # Processar outra ação # Faça outra coisa após a frente retorna}} # o modelo foo.tt tt pode usar os dados do banco de dados do banco de dados # chamado de / bar / de / sabão, / bar / de / sabão / 10, etc. sub barra: caminho ('/ bar / sabão') {...} # chamado por todas as ações, a partir do Top-mais controlador para baixo submart: private {my ($ self, $ c) = @_; if (! $ c-> user_exists) {# Catalyst :: Plugin :: autenticação $ c-> res-> redirecionar ('/ login'); # Requer o retorno de login 0; # abortar pedido e ir imediatamente para final ()} return 1; # sucesso; Continuar para a próxima ação} # chamado depois de todas as ações terminarem Sub-final: privado {My ($ self, $ c) = @_; if (escalar @ {$ c-> error}) {...} # manusear erros Retorna se $ c-> res-> corpo; # já tem uma resposta $ c-> encaminhamento ('myapp :: ver :: tt'); # render template} ### em myapp / controller / foo.pm # chamado para / foo / bar sub barra: local {...} # chamado para / blargle sub blargle: global {...} # uma ação de índice corresponde / foo, mas não / foo / 1, etc. sub index: private {...} ### em myapp / controlador / foo / bar.pm # chamado para / foo / bar / baz sub baz: local {.. .} # primeiro raiz automático é chamado, então foo automático, então este sub-automático: private {...} # poderosos caminhos de expressão regular também são possíveis subternos: regex ('^ produto / (w +) / detalhes $') { meu ($ self, $ c) = @_; # extrair o (W +) a partir do URI meu produto $ c-> req-> capturas -> ; } Requisitos: · Requisitos de Perl: · Perl.

Catalisador Software Relacionado