Re: array of hash arrays, right?

If you just want to print it out to visualise the data for exploration, debugging etc., you don't need to go to the trouble of exploding it yourself - just use Data::Dumper which can print (nearly) any Perl data structure:

use strict;
use Data::Dumper;

my @ahoa=( ... );

print Dumper \@ahoa;
[download]

Comment on Re: array of hash arrays, right? Download Code

Replies are listed 'Best First'.
Re^2: array of hash arrays, right? by Fletch (Bishop) on Aug 01, 2006 at 13:45 UTC
Alternately consider using YAML (or YAML::Syck). `use YAML; my @aohoh = @{ YAML::Load( <<EOT ) }; --- #YAML:1.0 - 1: { A: 1.1, B: 10.1, C: 100.1 } 2: { A: 2.1, B: 20.1, C: 200.1 } 3: { A: 3.1, B: 30.1, C: 300.1 } - 4: { A: 4.1, B: 40.1, C: 400.1 } 5: { A: 5.1, B: 50.1, C: 500.1 } 6: { A: 6.1, B: 60.1, C: 600.1 } - 7: { A: 7.1, B: 70.1, C: 700.1 } 8: { A: 8.1, B: 80.1, C: 800.1 } 9: { A: 9.1, B: 90.1, C: 900.1 } EOT print YAML::Dump( \@aohoh ), "\n";` [download] Update: Added `use` line; I was using `perl -MYAML` testing but the snippet won't run as is without it.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: array of hash arrays, right?
by Fletch (Bishop) on Aug 01, 2006 at 13:45 UTC

Alternately consider using YAML (or YAML::Syck).

use YAML;

my @aohoh = @{ YAML::Load( <<EOT ) };
--- #YAML:1.0
- 1: { A: 1.1, B: 10.1, C: 100.1 }
  2: { A: 2.1, B: 20.1, C: 200.1 }
  3: { A: 3.1, B: 30.1, C: 300.1 }
- 4: { A: 4.1, B: 40.1, C: 400.1 }
  5: { A: 5.1, B: 50.1, C: 500.1 }
  6: { A: 6.1, B: 60.1, C: 600.1 }
- 7: { A: 7.1, B: 70.1, C: 700.1 }
  8: { A: 8.1, B: 80.1, C: 800.1 }
  9: { A: 9.1, B: 90.1, C: 900.1 }
EOT

print YAML::Dump( \@aohoh ), "\n";
[download]

Update: Added use line; I was using perl -MYAML testing but the snippet won't run as is without it.

[reply]
[d/l]
[select]