#!/usr/bin/perl -w use strict; my @array1=qw(wert1 wert2); my @array2=qw(wert1 wert2); my $arrayref1=\@array1; my $arrayref2=\@array2; my %hash=("schluessel1" => "$arrayref1", "schluessel2" => "$arrayref2" ); foreach my $key (keys %hash) { print "$key: \t $hash{$key}\n"; }