Catalyst Framework Perl - Parte III

Nesse artigo vou mostrar o básico sobre como usar os Actions para definir a organização de sua aplicação e como capturar os argumentos.

[ Hits: 7.946 ]

Por: Lucas em 30/10/2012


Capturando os argumentos



Para capturar os argumentos do action usando Global, exemplos:

- Primeiro exemplo com um argumento:

sub exemplo : Global {
my ( $self, $c, $argumento) = @_;

$c->res->body("$argumento");
}

Quando você acessar a URL assim: http://localhost:3000/exemplo/lucas

Irá imprimir na tela:
lucas

- Segundo exemplo com dois argumentos:

sub exemplo : Global {
my ( $self, $c, $argumento1, $argumento2 ) = @_;

$c->res->body("$argumento1 $argumento2");
}

Quando você acessar a URL assim: http://localhost:3000/exemplo/maria

Irá imprimir na tela:
maria

Quando você acessar a URL assim: http://localhost:3000/exemplo/maria/jesus

Irá imprimir na tela:
maria jesus

Para capturar o action que está sendo executado, você usa o método action. Exemplo:

sub site : Global {
my ( $self, $c ) = @_;

$c->res->body($c->action);
}

Quando você acessar a URL assim: http://localhost:3000/site

Irá imprimir na tela:
site

Para capturar os valores da regex usando Regex, exemplo:

sub foo : Regex('^item(\d+)/order(\d+)$') {
my ( $self, $c ) = @_;

my $valor1 = $c->req->captures->[0];
my $valor2 = $c->req->captures->[1];

$c->res->body("Valor 1: $valor1 <br /> Valor 2: $valor2");
}

Quando você acessar a URL assim: http://localhost:3000/item879/order8999

Irá imprimir na tela:
Valor 1: 879
Valor 2: 8999

Espero que tenham gostado. Para saber mais sobre Catalyst:
Autor: Lucas Tiago de Moraes (Lucas1)
E-mail:lucastiagodemoraes[at]gmail.com

Artigo previamente publicado em:
Página anterior    

Páginas do artigo
   1. Usando os Actions
   2. Capturando os argumentos
Outros artigos deste autor

URL amigável com Perl

Catalyst Framework Perl - (parte 2)

Catalyst Framework Perl (parte 1)

Executando os principais frameworks Perl no cPanel com CGI

Configurando OTRS com PSGI/Plack e executando com Starman

Leitura recomendada

Catalyst Framework Perl - (parte 2)

URL amigável com Perl

Introdução a CGI com a RFC 3875

Executando os principais frameworks Perl no cPanel com CGI

Twittando com o Perl (parte 1)

  
Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts