Select Code to Download

  use CGI;
  # ...
  print FH CGI->table(@rows);

  print FH CGI->start_table;
  print FH @rows;
  print FH CGI->end_table;