Eu me embarelhei todo tentando compreender.<br><br>No caso você quer que uma rotina dentro do .PL altere a referência ao módulo?<br>Envie um código do que você quer emsmo que não funcione só para que eu possa compreender melhor.
<br><br>:)<br><br><div><span class="gmail_quote">On 3/5/07, <b class="gmail_sendername">Thomas Britis</b> <<a href="mailto:thomas@tcnet.com.br">thomas@tcnet.com.br</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Senhores,<br><br> Apenas como complemento:<br><br> Eu sei que se eu fizer:<br><br>$jj = $jj->bla ($jj);<br><br>e fizer na função bla() do PM:<br>sub bla {<br> my $self = shift;<br><br> $self->{tchau} = 10;
<br> return $self;<br>}<br><br>eu vou ter o valor que quero. Porém, o que eu quero saber é se posso<br>mexer no $jj sem ter que retorná-lo. Assim como pode ser feito em C.<br><br> Obrigado.<br><br>Thomas Britis wrote:
<br>> Senhores,<br>><br>> Tenho uma pequena dúvida e com certeza vcs podem me ajudar.<br>><br>> Fiz um pequeno teste da seguinte forma:<br>><br>> arquivo: UGLY.pm<br>><br>> package UGLY;
<br>> use strict;<br>><br>> sub new {<br>> my $self = {};<br>><br>> bless $self;<br>><br>> $self->{oi} = 3;<br>> return $self;<br>> }<br>><br>> arquivo: teste.pl<br>><br>> BEGIN { unshift (@INC, "."); }
<br>> my $jj = UGLY->new();<br>><br>> print $jj->{oi}, "\n";<br>><br>> Pois bem, imprimiu o 3 como devido. Minha dúvida é: eu posso trabalhar<br>> com a mesma variavel jj (que é o $self retornado pelo new() do módulo)
<br>> DENTRO do módulo? Explico:<br>><br>> Além da função new() no módulo eu tivesse:<br>> sub bla {<br>> my $self = shift;<br>><br>> $self->{tchau} = 10;<br>> }<br>><br>> e chamasse no
teste.pl:<br>> $jj->tchau UGLY;<br>> ou ainda:<br>> $jj->tchau ($jj);<br>> ou sei lá o que, mas que eu tivesse no arquivo pl (e não no módulo) o<br>> retorno da função bla, ou seja:<br>> print $jj->{tchau}, "\n";
<br>><br>> Se fui muito confuso, por favor, me avisem.<br>><br>> Obrigado.<br><br>--<br>Thomas Storino Britis<br>TCNet Informatica e Telecomunicacoes LTDA<br>_______________________________________________
<br>SaoPaulo-pm mailing list<br><a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br></blockquote></div>
<br><br clear="all"><br>-- <br>Gabriel Vieira