Select Code to Download

i.e.
43  $sth=$dbh->prepare("select * from people where name=?");
...
47                  print "$ar \n";                             
48          }                                                   
49  $sth->finish;

name doug
last mitchell
phone 1234567
address house
colour blue

doug
mitchell
1234567
house
blue