[SP-pm] Executar uma 'sub' a partir de um hashref

André Garcia Carneiro andre.garcia.carneir em terra.com.br
Sexta Fevereiro 29 09:56:01 PST 2008


Oi Gabriel!

Então, na verdade o objetivo é fazer algo próximo a um 'dispacher', onde eu posso ter subrotinas associadas a
um único valor dentro de um hash. O meu problema era como enviar parâmetros para executar, mas agora o Champs
já me esclareceu.

De qualquer forma valeu!


Cheers! ;)


---------- Cabeçalho original -----------

De: saopaulo-pm-bounces+andre.garcia.carneir=terra.com.br em pm.org
Para: saopaulo-pm em mail.pm.org
Cópia: 
Data: Fri, 29 Feb 2008 12:52:09 -0300
Assunto: Re: [SP-pm] Executar uma 'sub' a partir de um hashref

> Desculpe, mas me confundi todo, seria isso?
> 
> 
> ----------------8<-------------------
> use Data::Dumper;
> my $cmd_table = {'Add',&add(1,2)};
> sub add {
>      my ($v1,$v2) = @_;
>      my $result = $v1 + $v2;
>      return $result;
> }
> print Dumper $cmd_table;
> print $cmd_table->{Add};
> ---------------->8-------------------
> 
> 2008/2/29 André Garcia Carneiro <andre.garcia.carneir em terra.com.br>:
> > Salve galeara!
> >
> >  Estou tentando fazer o seguinte. Eu tenho uma série de opções que o meu usuário pode colocar como 'input', e
> >  gostaria de processá-las como algo parecido com o código abaixo:
> >  <code>
> >  use strict;
> >  .
> >  .
> >  .
> >  my $cmd_table = {'Add',\&add(1,2)};
> >
> >  sub add {
> >       my ($v1,$v2) = @_;
> >       my $result = $v1 + $v2;
> >       return $result;
> >  }
> >
> >  </code>
> >
> >
> >  Claro que é só um exemplo. Mas o problema é que não estou entendendo como executar, e capturar o valor, quando
> >  chamo a sub 'add'. Por exemplo:
> >
> >  <code>
> >  .
> >  .
> >  .
> >  my $userinput = shift;
> >  my $result = $cmd->{$userinput};
> >
> >  </code>
> >
> >  Alguém poderia me corrigir/explicar o que está acontecendo aqui, para que eu possa tentar fazer funcionar?
> >
> >
> >  Cheers!
> >
> >  --
> >  André Garcia Carneiro
> >  Developer(Perl/PHP)
> >  Member of "São Paulo Perl Mongers" - http://sao-paulo.pm.org
> >
> >
> >  _______________________________________________
> >  SaoPaulo-pm mailing list
> >  SaoPaulo-pm em pm.org
> >  http://mail.pm.org/mailman/listinfo/saopaulo-pm
> >
> 
> 
> 
> -- 
> Gabriel Vieira
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
> 

--
André Garcia Carneiro
Developer(Perl/PHP)
Member of "São Paulo Perl Mongers" - http://sao-paulo.pm.org



Mais detalhes sobre a lista de discussão SaoPaulo-pm