my $Erudil = 0;