use strict;
use warnings

my %test_hash =(

	'Test1'		=>	'eins zwei drei',
	'Test2'		=> 	'vier fuenf sechs',
);

my @gesammelt = ('Test1');
	
foreach (@gesammelt) {
	print $_, "\n";
	print $test_hash{$_}, "\n";
}

# Ausgabe:
Test1
eins zwei drei