next if $n =~ /0\d+/;

##</code><code>##

$count++ if $num % $divider  == 0;

##</code><code>##

foreach my $divider (2..9)