my $teiler = 2;