title: Excel::Writer::XLSX Unreadable content error
body: <p>I just started using Perl and I am using
  <a href="https://metacpan.org/pod/Excel::Writer::XLSX" rel="nofollow noreferrer"><code>Excel::Writer::XLSX</code></a>
  to query a DB2 database and export the data to an .xlsx file. The data is about 250k rows.</p>
  
  <p>The script is running fine, but when I try to open the Excel file it throws an error and asks to repair the file. Upon repairing some of the data gets replaced by <code>inf</code>.</p>
  
  <p><img src="https://i.stack.imgur.com/97h7S.png" alt="Error dialog saying &quot;Excel found unreadable content in &#39;Chk.xlsx&#39;. Do you want to recover the contents of this workbook? If you trust the source of this workbook, click Yes.&quot;"></p>
  
  <p>Below is a snippet from my code.</p>
  
  <pre><code>while ( my $sqlStatement = ) {
  
      $mSQL = $dbh-&gt;prepare( $sqlStatement )
              or die "Can't prepare $sqlStatement";
      $mSQL-&gt;execute()
              or die "Can't execute $sqlStatement";
  }
  
  my $workbook = Excel::Writer::XLSX-&gt;new( $ARGV[2] );
  $workbook-&gt;set_tempdir( '/tempDir/' );
  $workbook-&gt;set_optimization();
  
  my $worksheet = $workbook-&gt;add_worksheet();
  $worksheet-&gt;keep_leading_zeros();
  
  my $row    = 0;
  my $column = 0;
  
  my @emptyRow = ();
  
  $worksheet-&gt;write_row( $row++, $column, [ @{ $mSQL-&gt;{NAME_uc} } ] );
  $worksheet-&gt;write_row( $row++, $column, [ @emptyRow ] );
  
  while ( my @Row = $mSQL-&gt;fetchrow_array ) {
      $worksheet-&gt;write_row( $row++, $column, [ @Row ] );    #, $cellFormat);
      $count++;
  }
  
  $workbook-&gt;close();
  </code></pre>
  
  <p>Can someone please advise me on this issue?</p>