[SP-pm] Exportar configuração para outros modulos
Jose Nilton
jniltinho at gmail.com
Fri Sep 7 04:31:53 PDT 2012
Muito bom mesmo Eden.
Em 7 de setembro de 2012 03:07, Eden Cardim <eden em insoli.de> escreveu:
> >>>>> "thiagoglauco" == thiagoglauco <thiagoglauco em ticursos.net> writes:
>
> thiagoglauco> Com Moose seu pacote Shapes ficaria assim:
> thiagoglauco> package Shapes;
> thiagoglauco> use Moose;
>
> thiagoglauco> has x => ( isa => "Int",
> thiagoglauco> reader => "get_x",
> thiagoglauco> writer => "set_x" );
>
> thiagoglauco> has y => ( isa => "Int",
> thiagoglauco> reader => "get_y",
> thiagoglauco> writer => "set_y" );
>
> thiagoglauco> sub moveTo {
>
> thiagoglauco> my ($self, $deltax, $deltay) = @_;
> thiagoglauco> $self->set_x( $self->get_x + $deltax );
> thiagoglauco> $self->set_y( $self->get_y + $deltay );
>
> thiagoglauco> }
>
>
--
..............................................................................
*Com Deus todas as coisas são possíveis* :::
LinuxPro<http://www.linuxpro.com.br>
*"A qualidade nunca se obtém por acaso; ela é sempre o resultado do esforço
inteligente." (John Ruskin)
"A mente que se abre a uma nova ideia jamais volta ao seu tamanho original"
(Albert Einstein)*
-------------- Pr?xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20120907/f2015a6f/attachment.html>
More information about the SaoPaulo-pm
mailing list