use strict;
use warnings;

my $text_1 = '1. Text';
my $text_2 = '2. Text';
my $text_3 = '3. Text';

foreach my $item (1..3) {
	print "Item : $item\n";
	print "Inhalt: ".$text_$item."\n";
	} # foreach