use Text::Template;
my $template = Text::Template->new(TYPE => 'STRING', SOURCE => '{$var1}');
my $templateVars = {
	'var1' => 'Hier kommt die var2: {$var2}!',
	'var2' => 'YAY',
};
print $template->fill_in(HASH => $templateVars);