for($i=$o; $i<=$e; $i++){

##</code><code>##

print "2 is prime\n" if $o == 2;
$o++ if $o % 2;
for my $i ( $i=$o; $i<=$e; $i+=2 ){