Select Code to Download

#!E:/users/yin/perl/bin
print "Context-type  text/html\n\n";
...
  {  
   print "@row\n";
}

Context-type text/html

...
Frog
Jameson
Gold

THis is try for DBI module