Help for this page

Select Code to Download

Select or download this

my $table = $sth->fetchall_hashref; 
  for my $r (@$table) {

Select or download this
```
while(my $r=$sth->fetchrow_hashref ){
```