[Cascavel-pm] Sort em array de hash.

[Gilmar Júnior]

Olá, Rodrigo

O trecho a seguir não está muito bonito, mas acho que funciona:

<perl>
$VAR1->{$_} = [ sort { $a->{'ppd_model'} cmp $b->{'ppd_model'} }
@{$VAR1->{$_}} ] foreach (keys %{$VAR1});
</perl>

[]'s
Gilmar.

Rod Za escreveu:

>Srs, Sras,
>
>Eu bati cabe�a para todo lado na tentativa de solocar em ordem crescente uma estrutura que
>tenho. E n�o consegui nem por reza brava.
>
>Algu�m poderia me indicar uma dire��o que posso seguir?
>
>Minha estrutura est� abaixo, o que eu estou tentando fazer � colocar por ordem crescente o
>campo "ppd_model" para cada chave (Hitachi, PCPI):
>
><valores>
>$VAR1 = {
>          'Hitachi' => [
>                         {
>                           'ppd_lang' => 'en',
>                           'ppd_driver' => 'DDP_70_with_MicroPress.ppd.gz',
>                           'ppd_model' => 'Hitachi DDP 70 Foomatic/Postscript (recommended)'
>                         }
>                       ],
>          'PCPI' => [
>                      {
>                        'ppd_lang' => 'en',
>                        'ppd_driver' => 'PCPI/1030-gimp-print.ppd.gz',
>                        'ppd_model' => 'PCPI 1030 Foomatic/gimp-print'
>                      },
>                      {
>                        'ppd_lang' => 'en',
>                        'ppd_driver' => 'PCPI/1030-laserjet.ppd.gz',
>                        'ppd_model' => 'PCPI 1030 Foomatic/laserjet (recommended)'
>                      }
>                    ],
>}
></valores>
>
>Muito obrigado, de qualquer forma.
>
>Rodrigo Zadra Armond.
>
>
>		
>__________________________________________ 
>Yahoo! DSL – Something to write home about. 
>Just $16.99/mo. or less. 
>dsl.yahoo.com 
>
>_______________________________________________
>Cascavel-pm mailing list
>Cascavel-pm em pm.org
>http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>  
>