Patrix Diradja wrote:
while(!$rsnya->{EOF}){
my $tab4l = $rsnya->fetchrow_array;
print "\$tab4l: $tab4l \n";
$rsnya->movenext;
}
Not a mod_perl question, per se, but try
while(my $tab4l = $rsnya->fetchrow_array) {
print "\$tab4l: $tab4l\n";
}
Rob
