use vars qw($Title);
$Title = "Titel";