Re^13: Hash of Arrays or Arrays of arrays? and how proceed?

You are right, this is a reference to the same hash as above, i.e. this is not correct. @nextfield has the same problem as @field had, i.e. it is a global variable, not a new one every time. So every next hash entry points to the same hash. Solution:

Add "my @nextfield;" in the subroutine near the location where "my @field= sort(..." is.

Comment on Re^13: Hash of Arrays or Arrays of arrays? and how proceed?

Replies are listed 'Best First'.
Re^14: Hash of Arrays or Arrays of arrays? and how proceed? by paride (Initiate) on Aug 10, 2011 at 13:45 UTC
PERFECT! Now the dumper print: ################# Stampa dati FUORI SUBROUTINE ############### $VAR1 = { '6' => { 'next' => [ 'AO' ], 'fields' => [ 'AA,8,U,DE', 'AB,8,U,I', 'AC,14,U,I', 'AD,8,U,DE', 'AE,8,U,DE', 'AF,8,A,DE', 'AG,8,U,DE', 'AH,7,U,I', 'AI,8,U,DE', 'AJ,7,U,I', 'AK,5,A,DE', 'AL,10,A,I', 'AM,2,A,DE', 'AN,14,U,I' ] }, '5' => { 'next' => [ 'AQ' ], 'fields' => [ 'AA,8,U,DE', 'AB,8,U,I', 'AC,14,U,I', 'AD,8,U,DE', 'AE,8,U,DE', 'AF,8,A,DE', 'AG,8,U,DE', 'AH,7,U,I', 'AI,8,U,DE', 'AJ,7,U,I', 'AK,5,A,DE', 'AL,10,A,I', 'AM,2,A,DE', 'AN,20,U,I', 'AO,20,A,DE,NU', 'AP,10,U,MU' ] } }; Il primo campo disponibile del file 905 sul Database 5 e': AQ Il primo campo disponibile del file 905 sul Database 6 e': AO [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re^14: Hash of Arrays or Arrays of arrays? and how proceed?
by paride (Initiate) on Aug 10, 2011 at 13:45 UTC

PERFECT! Now the dumper print:

################# Stampa dati FUORI SUBROUTINE ###############


$VAR1 = {
          '6' => {
                   'next' => [
                               'AO'
                             ],
                   'fields' => [
                                 'AA,8,U,DE',
                                 'AB,8,U,I',
                                 'AC,14,U,I',
                                 'AD,8,U,DE',
                                 'AE,8,U,DE',
                                 'AF,8,A,DE',
                                 'AG,8,U,DE',
                                 'AH,7,U,I',
                                 'AI,8,U,DE',
                                 'AJ,7,U,I',
                                 'AK,5,A,DE',
                                 'AL,10,A,I',
                                 'AM,2,A,DE',
                                 'AN,14,U,I'
                               ]
                 },
          '5' => {
                   'next' => [
                               'AQ'
                             ],
                   'fields' => [
                                 'AA,8,U,DE',
                                 'AB,8,U,I',
                                 'AC,14,U,I',
                                 'AD,8,U,DE',
                                 'AE,8,U,DE',
                                 'AF,8,A,DE',
                                 'AG,8,U,DE',
                                 'AH,7,U,I',
                                 'AI,8,U,DE',
                                 'AJ,7,U,I',
                                 'AK,5,A,DE',
                                 'AL,10,A,I',
                                 'AM,2,A,DE',
                                 'AN,20,U,I',
                                 'AO,20,A,DE,NU',
                                 'AP,10,U,MU'
                               ]
                 }
        };

Il primo campo disponibile del file 905 sul Database 5 e': AQ

Il primo campo disponibile del file 905 sul Database 6 e': AO
[download]

[reply]
[d/l]