Help for this page

Select Code to Download

Select or download this

{
   local $, = "\t";
...
      print @$row;
   }
}