Cara, então,
Olhando seus e-mails, se vc guardou do jeito que o Gabriel mostrou, é mais fácil guardar do jeito que o Eden/Marcio mostraram, e ai não tem erro, é só usar keys http://perldoc.perl.org/functions/keys.html para percorrer os registros. Caso você precise de um 'join', você pode simular isso com um terceiro hash. my $*hash1* = { "primary-key" => { campo => $valor }, "primary-key2" => { campo => $valor , outro_campo => $valor } }; my $*hash2* = { "primary-key" => { xxx => $valor }, "primary-key2" => { xxx => $valor } }; my $*join* = {}; foreach my $pk (keys %$*hash1*){ if (exists $*hash2*->{$pk}){ $*join*->{$pk} = { hash1 => $*hash1*, hash2 => $*hash2* } } } ou até mesmo, facilitar o codigo, e remover o $*join*, por exemplo: foreach my $pk (keys %$*hash1*){ if (exists $*hash2*->{$pk}){ $*hash1*->{$pk}{hash2} = *hash2;* } } E a partir dai você teria uma referencia para o *hash2* correto dentro de cada registro do *hash1, *isso se existiu né. 2013/3/12 Marcio - Google <[email protected]> > Boa Renato, mais a instalação de módulos é complicado. Vou ver se esse > está instalado. > > Em 11 de março de 2013 23:11, Renato Santos <[email protected]>escreveu: > > Eu acho que ele não quer manter não, só quer fazer consultas mais >> facilmente, pois o hash dele deve estar ~confuso~ como ele mesmo disse. >> >> como ele mesmo já citou tabela, >> >> eu acho que https://metacpan.org/module/DBD::RAM pode ser util nesse >> caso, >> pois não haveria muita perda de velocidade, pois todos os dados ainda >> estariam na RAM, e você podera acessa-los via SQL. >> >> 2013/3/11 Gabriel Vieira <[email protected]> >> >>> Seria bom um exemplo de dados. >>> Você pode fazer uso desde sistemas específicos com memcached ou outro, >>> como pode fazer uso de HASH/ARRAY, como dito. >>> >>> Superficialmente (não sei que dados são esses) indico: >>> >>> %hash = ( >>> 1 => [camisa,g,azul,20r$], >>> 2 => [tenis,32,branco,200r$], >>> ); >>> >>> Bom, isso é muito superficial mesmo, vai depender do que quer guardar. >>> >>> 2013/3/11 Marcio - Google <[email protected]>: >>> > Mestres, >>> > >>> > Tenho um script que quado inicializa começa acumular algumas >>> informações, >>> > e quando é finalizado essas informações são descartadas. É pouco coisa. >>> > Preciso de algo como uma tabela temporária, os dados só existem >>> durante a >>> > execução do script. >>> > To usando por enquanto hashes, mais tá ficando confuso. >>> > Pensando em uma tabela em um banco de dados (o que é inviável), ela >>> teria >>> > 7 colunas, sendo uma delas a chave e pela qual preciso localizar os >>> > registros, e não teria mais que 20 registros. >>> > Quando o script inicia, a tabela não teria nenhum valor, apenas a >>> > "estrutura", durante a execução serão incluídos, excluídos e alterados >>> > registros. Quando o script termina os dados são descartados. >>> > >>> > Qual a maneira mais prática e elegante de fazer isso? >>> > >>> > >>> > [...]'s >>> > >>> > Marcio >>> > >>> > =begin disclaimer >>> > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>> > SaoPaulo-pm mailing list: [email protected] >>> > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>> > =end disclaimer >>> > >>> >>> >>> >>> -- >>> Gabriel Vieira >>> =begin disclaimer >>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>> SaoPaulo-pm mailing list: [email protected] >>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>> =end disclaimer >>> >> >> >> >> -- >> Saravá, >> Renato CRON >> http://www.renatocron.com/blog/ >> @renato_cron <http://twitter.com/#!/renato_cron> >> >> =begin disclaimer >> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >> SaoPaulo-pm mailing list: [email protected] >> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >> =end disclaimer >> >> > > > -- > > [...]'s > > Marcio > =begin disclaimer > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > SaoPaulo-pm mailing list: [email protected] > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> > =end disclaimer > > -- Saravá, Renato CRON http://www.renatocron.com/blog/ @renato_cron <http://twitter.com/#!/renato_cron>
=begin disclaimer Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ SaoPaulo-pm mailing list: [email protected] L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> =end disclaimer
