in reply to Working with arrays

Sorry, kevinw. Even after those two additions, I still can't tell the difference between this: 

typea
name5 9 8 2 1 

typex
name1 1 2 3 4
name3 2 3 3 1 

typey
name2 3 4 5 6 

typez
name4 5 3 4 2

[download]
(what you're getting now), and this:
typex
name1 1 2 3 4 
name3 2 3 3 1
typey
name2 3 4 5 6 
typea
name5 9 8 2 1
typez
name4 5 3 4 2

[download]
(what you want).

Do you want to omit the additional newline before your print the key? Just leave out the print "\n"; at the end of the foreach loop.

Or do you want it to come out in a different order (you have "typex", "typey", "typea", "typez")? Unless you have an explicit list of the order, I don't see what the ordering is.

Help us to help you. What's the difference between what you have and what you want? Spell it out in painful detail.

Replies are listed 'Best First'.
Re: Re: Working with arrays
by kevinw (Novice) on Jul 24, 2002 at 15:33 UTC
    yes, instead of having it come out in the order typea, typex, typey, and typez, i want it to come out in the order of typex,typey,typea,typez
[reply]

      Alright. The ordering you're getting now is alphabetical, as a result of sort keys %data.

      I can't see an ordering in the series "x", "y", "a", "z". The only way I can see to do that is to define it explicitly, something like this: foreach my $key (qw(typex typey typea typez))

      If there is an order to that series that I'm not seeing, you may be able to capture the logic in a custom sort function. Look up the sort docs for more info.

      HTH

[reply]
[d/l]
[select]
        ok..thanks for the help
[reply]

In Section Seekers of Perl Wisdom