Re: [Rio-pm] (sem assunto)

[Fernando Oliveira]

Enviado do meu iPhone

> Em 24 de mar de 2017, às 14:18, Aureliano Guedes <guedes_1...@hotmail.com> 
> escreveu:
> 
> Eu resolvi o problema, era so eu retornar um array de resultados da recurção 
> [caso tenha] e incluir juntar com o array da interação anterior sempre que 
> terminar uma das recurções.
> 
> Quanto a dúvida da string, seria forçar uma string vazia (uma string que não 
> está guardando nenhuma referência) virar um array;
> 
> my @a = qw(a b c d e);
> 
> my $b = \@a; #isso é uma string com o endereço de memoria do array 
> (referÊncia)
> 
Não, isso não é uma string, isso é uma variável scalar com uma referencia
> 
> my $b;
> 
> @$b = qw(a b c d e); #isso é um array forçado
> 
Nao, isso é uma variável escalar com uma referencia e sendo desreferenciado. E 
isso funciona graças a auto-vivificação
> 
> mas a dúvida é, o que fica em $b?
> 
Como eu disse, $b é uma referencia a array
> Pelo que me parece ele cria automaticamente uma referência pra um array 
> anonimo que dereferenciado por @$b 
> 
Autovivificação
> 
> O que me leva a crer que
> my @a = qw(a b c d e);
> 
> my $b = \@a;
> 
A única diferença é @a não ser anônimo 
> 
> é o mesmo que
> 
> my $b ;
> 
> @$b = qw(a b c d e);j
> From: Rio-pm <rio-pm-bounces+guedes_1000=hotmail@pm.org> on behalf of 
> Andre Carneiro <andregarciacarne...@gmail.com>
> Sent: Friday, March 24, 2017 4:54:22 PM
> To: Perl Mongers Rio de Janeiro
> Subject: Re: [Rio-pm] (sem assunto)
>  
> Creio que você esteja pensando nisso errado!
> 
> Se vc tem uma String em $S, você não tem uma referência para array @A. Se 
> você quer uma referência do array @A em $S, você pode fazer:
> 
> my $S = \@A;
> 
> Eu sugiro que você use Data::Printer ou mesmo Data::Dumper para ver o 
> conteúdo das variáveis.
> 
> Quanto ao problema da string, não sei se entendi o que vc quer. Vou dizer 
> como transformar uma string em array sem usar 'join'.
> 
> 
> use strict;
> use warnings;
> use feature qw/say/;
> use Data::Printer colored => 1;
> 
> my $s = "WHATEVER";
> my @A = split //,$s;
> 
> print p @A;
> 
> 
> 
> 
> 
> 
> 
> 2017-03-22 19:14 GMT-03:00 Aureliano Guedes <guedes_1...@hotmail.com>:
>> Olá monges,
>> 
>> Estou com uma série de dúvidas relacionada a uma rotina que estou fazendo;
>> 
>> Dado um hash de arrays eu preciso construir uma hierarquia não redundante 
>> dos valores desse array.
>> 
>> Tudo esta explicado melhor em :
>> http://pastebin.com/64fJvYr6
>> 
>> Duas dúvidas surgiram meio essa questão
>> 1- Como forçar uma string virar um array sem fazer join dos valores, sendo 
>> que a string não está guardando uma referência?
>> Algo como:
>> my $s;
>> @$s = qw(a b c d e);
>> 
>> 
>> 2- Se eu tenho uma string $S que guarda uma referencia para um array @A, 
>> essa string está dentro de uma rotina e a rotina é recursiva, e precisa 
>> enviar os valores da string S para a recursão, o que deve ser enviado é a 
>> string $S ou o array @$S? 
>> sub teste{
>> 
>> my ($S) = @_;
>> 
>> teste(\@$S) # ou simplesmente $S?
>> }
>> 
>> Desde já grato.
>> 
>> Att,
>> acp
>> 
>> ___
>> Rio-pm mailing list
>> Rio-pm@pm.org
>> http://mail.pm.org/mailman/listinfo/rio-pm
> 
> 
> 
> -- 
> André Garcia Carneiro
> Software Engineer
> (11)982907780
> ___
> Rio-pm mailing list
> Rio-pm@pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Re: [Rio-pm] (sem assunto)

[Aureliano Guedes]

Eu resolvi o problema, era so eu retornar um array de resultados da recurção 
[caso tenha] e incluir juntar com o array da interação anterior sempre que 
terminar uma das recurções.

Quanto a dúvida da string, seria forçar uma string vazia (uma string que não 
está guardando nenhuma referência) virar um array;

my @a = qw(a b c d e);

my $b = \@a; #isso é uma string com o endereço de memoria do array (referÊncia)

my $b;

@$b = qw(a b c d e); #isso é um array forçado

mas a dúvida é, o que fica em $b?
Pelo que me parece ele cria automaticamente uma referência pra um array anonimo 
que dereferenciado por @$b

O que me leva a crer que
my @a = qw(a b c d e);

my $b = \@a;


é o mesmo que

my $b ;

@$b = qw(a b c d e);j


From: Rio-pm <rio-pm-bounces+guedes_1000=hotmail@pm.org> on behalf of Andre 
Carneiro <andregarciacarne...@gmail.com>
Sent: Friday, March 24, 2017 4:54:22 PM
To: Perl Mongers Rio de Janeiro
Subject: Re: [Rio-pm] (sem assunto)

Creio que você esteja pensando nisso errado!

Se vc tem uma String em $S, você não tem uma referência para array @A. Se você 
quer uma referência do array @A em $S, você pode fazer:

my $S = \@A;

Eu sugiro que você use Data::Printer ou mesmo Data::Dumper para ver o conteúdo 
das variáveis.

Quanto ao problema da string, não sei se entendi o que vc quer. Vou dizer como 
transformar uma string em array sem usar 'join'.


use strict;
use warnings;
use feature qw/say/;
use Data::Printer colored => 1;

my $s = "WHATEVER";
my @A = split //,$s;

print p @A;







2017-03-22 19:14 GMT-03:00 Aureliano Guedes 
<guedes_1...@hotmail.com<mailto:guedes_1...@hotmail.com>>:

Olá monges,

Estou com uma série de dúvidas relacionada a uma rotina que estou fazendo;

Dado um hash de arrays eu preciso construir uma hierarquia não redundante dos 
valores desse array.

Tudo esta explicado melhor em :
http://pastebin.com/64fJvYr6


Duas dúvidas surgiram meio essa questão
1- Como forçar uma string virar um array sem fazer join dos valores, sendo que 
a string não está guardando uma referência?
Algo como:
my $s;
@$s = qw(a b c d e);


2- Se eu tenho uma string $S que guarda uma referencia para um array @A, essa 
string está dentro de uma rotina e a rotina é recursiva, e precisa enviar os 
valores da string S para a recursão, o que deve ser enviado é a string $S ou o 
array @$S?

sub teste{

my ($S) = @_;

teste(\@$S) # ou simplesmente $S?
}

Desde já grato.

Att,
acp

___
Rio-pm mailing list
Rio-pm@pm.org<mailto:Rio-pm@pm.org>
http://mail.pm.org/mailman/listinfo/rio-pm



--
André Garcia Carneiro
Software Engineer
(11)982907780
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Re: [Rio-pm] (sem assunto)

[Andre Carneiro]

Creio que você esteja pensando nisso errado!

Se vc tem uma String em $S, você não tem uma referência para array @A. Se
você quer uma referência do array @A em $S, você pode fazer:

my $S = \@A;

Eu sugiro que você use Data::Printer ou mesmo Data::Dumper para ver o
conteúdo das variáveis.

Quanto ao problema da string, não sei se entendi o que vc quer. Vou dizer
como transformar uma string em array sem usar 'join'.


use strict;
use warnings;
use feature qw/say/;
use Data::Printer colored => 1;

my $s = "WHATEVER";
my @A = split //,$s;

print p @A;







2017-03-22 19:14 GMT-03:00 Aureliano Guedes :

> Olá monges,
>
> Estou com uma série de dúvidas relacionada a uma rotina que estou fazendo;
>
> Dado um hash de arrays eu preciso construir uma hierarquia não redundante
> dos valores desse array.
>
> Tudo esta explicado melhor em :
> http://pastebin.com/64fJvYr6
>
>
> Duas dúvidas surgiram meio essa questão
> 1- Como forçar uma string virar um array sem fazer join dos valores, sendo
> que a string não está guardando uma referência?
> Algo como:
> my $s;
> @$s = qw(a b c d e);
>
>
> 2- Se eu tenho uma string $S que guarda uma referencia para um array @A,
> essa string está dentro de uma rotina e a rotina é recursiva, e precisa
> enviar os valores da string S para a recursão, o que deve ser enviado é a
> string $S ou o array @$S?
>
> sub teste{
>
> my ($S) = @_;
>
> teste(\@$S) # ou simplesmente $S?
> }
>
> Desde já grato.
>
> Att,
> acp
>
> ___
> Rio-pm mailing list
> Rio-pm@pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>



-- 
André Garcia Carneiro
Software Engineer
(11)982907780
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Re: [Rio-pm] (sem assunto)

[Fernando Oliveira]

Oi Aureliano!

o diamante (<>) pode resolver isso p/ vc.

se vc não passa um arquivo, ele le da stdin:

$ echo "bla" | perl -E 'say while <>'

bla


mas se vc passa um (ou mais) arquivo(s), ele o(s) le:

$ echo test > file$ perl -E 'say while <>' file

test


outras opções que facilitam ainda mais (vc não precisa nem usar o while) é
usar o -n e o -p...





Just another Perl Hacker,
Fernando (SmokeMachine)

Em 10 de novembro de 2016 20:43, Aureliano Guedes 
escreveu:

> Ola monges,
>
>
> Tenho uma pergunta simples pra vocês.
>
>
> Eu tenho um script que abre um arquivo e printa o resultado na saida
> padrão.
>
>
> Os parâmetros adicionais são processados via Getopt::Long;
>
>
> Bom, o que eu queria era fazer algo mais Unix style.
>
>
> Quero poder receber o nome do arquivo para abrir ou poder redirecionar a
> saida padrão pro script caso esteja em um pipeline.
>
>
> Por exemplo, hoje, se eu der um grep em um arquivo pra depois passar pro
> script eu tenho que fazer:
>
> $ grep '' arquivo >arquivo.tmp
>
> $ script.pl arquivo.tmp
>
>
> Eu quero poder fazer algo no estilo
>
> $ grep '' arquivo | script.pl
>
>
> Como eu poderia fazer isso? lembrando que eu posso passar pro script mais
> parametros se precisar
>
>
> Abraços,
>
> ___
> Rio-pm mailing list
> Rio-pm@pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

[Rio-pm] (sem assunto)

[Aureliano Guedes]

Ola monges,


Tenho uma pergunta simples pra vocês.


Eu tenho um script que abre um arquivo e printa o resultado na saida padrão.

Os parâmetros adicionais são processados via Getopt::Long;


Bom, o que eu queria era fazer algo mais Unix style.


Quero poder receber o nome do arquivo para abrir ou poder redirecionar a saida 
padrão pro script caso esteja em um pipeline.


Por exemplo, hoje, se eu der um grep em um arquivo pra depois passar pro script 
eu tenho que fazer:

$ grep '' arquivo >arquivo.tmp

$ script.pl arquivo.tmp


Eu quero poder fazer algo no estilo

$ grep '' arquivo | script.pl


Como eu poderia fazer isso? lembrando que eu posso passar pro script mais 
parametros se precisar


Abraços,
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Re: [Rio-pm] (sem assunto)

[Leonardo Alberto Souza]

tem espaço na grade sim.

inclusive o site fala que quem quiser palestrar mandar um email para:
h...@helabs.com.br


---
*
*
*Leonardo Alberto A. de J. Souza - Leobetosouza*


2013/9/5 Samir Cury rim...@gmail.com

 PS: Nao estou pedindo  a palestra para mim pois sei pouco ou nada
 sobre esses temas (que imagino ter alguma relacao com o evento) e nao
 estou mais no Rio.

 Mas sendo possivel de repente voluntarios aparecem.

 Abs

 2013/9/5 Samir Cury rim...@gmail.com:
  Leonardo, se a grade ainda nao estiver fechada rola incluir alguma
 palestra?
 
  Lembro de ter assistido umas boas sobre modulos para GUI e OpenGL se
  nao me engano.
 
  Abs
 
 
 
  2013/9/5 Leonardo Alberto Souza leobetoso...@gmail.com:
  Sorry pela falta de subject =S
 
 
  ---
 
  Leonardo Alberto A. de J. Souza - Leobetosouza
 
 
  2013/9/5 Leonardo Alberto Souza leobetoso...@gmail.com
 
  Tenho um amigo que é um dos organizadores desse evento:
  http://hackdesignconf.com.br/
 
  Eu tenho quase certeza que já postei sobre isso aqui antes, mas eles
 tão
  abrindo espaço pras comunidades. Então: se alguém se disponibilizar à
 no dia
  do evento ir pra levar cartazes, fazer divuldgação da comunidade ou
 algo do
  gênero, só avisar que eu faço a ponte.
 
  ---
 
  Leonardo Alberto A. de J. Souza - Leobetosouza
 
  ___
  Rio-pm mailing list
  Rio-pm@pm.org
  http://mail.pm.org/mailman/listinfo/rio-pm
 
 
 
  ___
  Rio-pm mailing list
  Rio-pm@pm.org
  http://mail.pm.org/mailman/listinfo/rio-pm
 ___
 Rio-pm mailing list
 Rio-pm@pm.org
 http://mail.pm.org/mailman/listinfo/rio-pm

___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Re: [Rio-pm] (sem assunto)

[Samir Cury]

PS: Nao estou pedindo  a palestra para mim pois sei pouco ou nada
sobre esses temas (que imagino ter alguma relacao com o evento) e nao
estou mais no Rio.

Mas sendo possivel de repente voluntarios aparecem.

Abs

2013/9/5 Samir Cury rim...@gmail.com:
 Leonardo, se a grade ainda nao estiver fechada rola incluir alguma palestra?

 Lembro de ter assistido umas boas sobre modulos para GUI e OpenGL se
 nao me engano.

 Abs



 2013/9/5 Leonardo Alberto Souza leobetoso...@gmail.com:
 Sorry pela falta de subject =S


 ---

 Leonardo Alberto A. de J. Souza - Leobetosouza


 2013/9/5 Leonardo Alberto Souza leobetoso...@gmail.com

 Tenho um amigo que é um dos organizadores desse evento:
 http://hackdesignconf.com.br/

 Eu tenho quase certeza que já postei sobre isso aqui antes, mas eles tão
 abrindo espaço pras comunidades. Então: se alguém se disponibilizar à no dia
 do evento ir pra levar cartazes, fazer divuldgação da comunidade ou algo do
 gênero, só avisar que eu faço a ponte.

 ---

 Leonardo Alberto A. de J. Souza - Leobetosouza

 ___
 Rio-pm mailing list
 Rio-pm@pm.org
 http://mail.pm.org/mailman/listinfo/rio-pm



 ___
 Rio-pm mailing list
 Rio-pm@pm.org
 http://mail.pm.org/mailman/listinfo/rio-pm
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Re: [Rio-pm] (sem assunto)

[Leonardo Alberto Souza]

Sorry pela falta de subject =S


---
*
*
*Leonardo Alberto A. de J. Souza - Leobetosouza*


2013/9/5 Leonardo Alberto Souza leobetoso...@gmail.com

 Tenho um amigo que é um dos organizadores desse evento:
 http://hackdesignconf.com.br/

 Eu tenho quase certeza que já postei sobre isso aqui antes, mas eles tão
 abrindo espaço pras comunidades. Então: se alguém se disponibilizar à no
 dia do evento ir pra levar cartazes, fazer divuldgação da comunidade ou
 algo do gênero, só avisar que eu faço a ponte.

 ---
 *
 *
 *Leonardo Alberto A. de J. Souza - Leobetosouza*

 ___
 Rio-pm mailing list
 Rio-pm@pm.org
 http://mail.pm.org/mailman/listinfo/rio-pm

___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

[Rio-pm] (sem assunto)

[Leonardo Alberto Souza]

Tenho um amigo que é um dos organizadores desse evento:
http://hackdesignconf.com.br/

Eu tenho quase certeza que já postei sobre isso aqui antes, mas eles tão
abrindo espaço pras comunidades. Então: se alguém se disponibilizar à no
dia do evento ir pra levar cartazes, fazer divuldgação da comunidade ou
algo do gênero, só avisar que eu faço a ponte.

---
*
*
*Leonardo Alberto A. de J. Souza - Leobetosouza*
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Re: [Rio-pm] (sem assunto)

[Samir Cury]

Leonardo, se a grade ainda nao estiver fechada rola incluir alguma palestra?

Lembro de ter assistido umas boas sobre modulos para GUI e OpenGL se
nao me engano.

Abs



2013/9/5 Leonardo Alberto Souza leobetoso...@gmail.com:
 Sorry pela falta de subject =S


 ---

 Leonardo Alberto A. de J. Souza - Leobetosouza


 2013/9/5 Leonardo Alberto Souza leobetoso...@gmail.com

 Tenho um amigo que é um dos organizadores desse evento:
 http://hackdesignconf.com.br/

 Eu tenho quase certeza que já postei sobre isso aqui antes, mas eles tão
 abrindo espaço pras comunidades. Então: se alguém se disponibilizar à no dia
 do evento ir pra levar cartazes, fazer divuldgação da comunidade ou algo do
 gênero, só avisar que eu faço a ponte.

 ---

 Leonardo Alberto A. de J. Souza - Leobetosouza

 ___
 Rio-pm mailing list
 Rio-pm@pm.org
 http://mail.pm.org/mailman/listinfo/rio-pm



 ___
 Rio-pm mailing list
 Rio-pm@pm.org
 http://mail.pm.org/mailman/listinfo/rio-pm
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm