$template_zeile =~ s/\[VAR(\d)+\]/$Vars[$1]/g;