http://www.perlmonks.org?node_id=243321


in reply to (dkubb) Re: (3) Printing a hash in a specific order?
in thread Printing a hash in a specific order?

dkubb,
Two minor corrections:

  • my $key = each %{$hashref}; - need to dereference the hash
  • my($key) = keys %{$hashref}; doesn't generate a list of keys in memory and assign the first one to key. It assigns all of them in serialized format to the variable. The reason why this works is because there is only one key.

    I also disagree with your analysis that your method would be faster in my example. Each has to retrieve both the key and lookup the value (which we are throwing away). My method is only retrieving a one element list of keys. I do appreciate the effort at making this more efficient. As I said - my first OO project and I know I am making a lot of mistakes. I think the proper way to fix this would be to start over.

    Cheers - L~R