$dokument =~ s/ +/ /g;
$dokument =~ s/\n+/\n/g;