use strict;
use warnings;

my @werte = (
             ['name1', 'adresse1'],
             ['name2', 'adresse2'],
             ['name3', 'adresse3'],
);

print $werte[1][1] . "\n";