my $nonuk = 4712;
my $ges = 8961;
printf "Nukleotide gesamt: %d\nNukleotide prozentual: %.2f\n", $nonuk, 100 * $nonuk / $ges;