#!/usr/local/bin/perl -w
# loh.pl -- Liste von Hashes

use Data::Dumper;                   # Standardmodul

$loh = [ { "One" => 1, "Two" => 2, "Three" => 3 },
         { "Eins" => 1, "Zwei" => 2, "Drei" => 3 } ];

print $loh->[0]{'Two'},  "\n";      # 2
print $loh->[1]{'Drei'}, "\n";      # 3

$loh->[1]{'Vier'} = 4;              # Hash erweiterbar

print Dumper($loh);                 # Erweiterte Anzeige