[SP-pm] Correção...

André Garcia Carneiro andre.garcia.carneir em terra.com.br
Sexta Novembro 3 03:52:09 PST 2006



 Palavras do Monge Mestre Cervejeiro
 
 package EncontroSocial;
 use strict;
 
 my $definicao = qq{Reunião informal de pessoas que geralmente trabalham ou se interessam por Perl que não tem
 vida social e se utilizam de desculpas esfarrapadas com suas esposas para encher a cara no bar, jogar sinuca e
 dar risada. De vez em quando, falamos em Perl.}; 
 

 
 sub mais_uma_por_favor
 {
       my $qual_cerveja = shift;
 
       $qual_cerveja = "Essa mesmo!" if(!$qual_cerveja);
       my $caneca_cheia = enche_caneca($qual_cerveja);
 
       return $caneca_cheia;
 }
 

sub new
{
	my $self = shift;
	bless{$self};
	return $self;
}
 1;
 
 
 --
 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