my  $post_data  = &make_form(%submit_data);
  my ($page,$response,%headers) = &post_https($server,$port,$path,'',$post_data);

   if (defined $page) 
     {
         $csv = new Text::CSV();
         $csv->parse($page);
         @col = $csv->fields();
......
}