use Apache::ASP::CGI;
&Apache::ASP::CGI::do_self(NoState => 1);
__END__
<% use lib '.';      use T;  $t =T->new(); %>
<% 
my $count = 0;  
for(1..3) {
        $count++;
}
if($count == 3) {
        $t->ok;
} else {
        $t->not_ok("for loop didn't work");
}       
$count = 0;
while(1) {
        last if (++$count > 2);      
}
if($count == 3) {
        $t->ok;
} else {
        $t->not_ok("while loop didn't work");
}       
$t->done;
%>