Выполнить Perl Write Excel XLS из File1 в File2 при сохранении цветового формата

Question

Используя Perl Write Excel XLS, я читаю из файла 1 и записываю в файл 2. Хотя мой код успешно записывает те же данные из файла 1 и файла 2, однако файл 2 не поддерживает тот же цветовой формат, что и файл 1 (файл 1 Excel отображает синий и белый формат для каждой второй строки).

Есть ли опция в Perl Excel Parse / Parse для сохранения того же цветового кода? Я исследовал CPAN и этот сайт, но не могу найти какие-либо опции, которые можно применить в сценарии Perl.

Мой код:

##! /usr/bin/perl
use v5.10.0;
use warnings;


use Spreadsheet::ParseExcel;
use Spreadsheet::ParseExcel::SaveParser;
use Spreadsheet::WriteExcel;


my $parser = Spreadsheet::ParseExcel::SaveParser->new();
my $workbook_R = $parser->parse('C:\Perl\databases\File1.xls');

my $workbook_W = Spreadsheet::WriteExcel->new('C:\Perl\databases\File2.xls');
my $worksheet_W = $workbook_W->add_worksheet();

for my $worksheet_R ($workbook_R->worksheets()) {

my ($row_min, $row_max ) = $worksheet_R->row_range();
my ($col_min, $col_max ) = $worksheet_R->col_range(); 


  for my $row ($row_min .. $row_max ) {
  for my $col ($col_min .. $col_max ) {

  my $value = $worksheet_R->get_cell($row, $col)->value;
  $worksheet_W->write($row, $col, $value);
   }
  }
 }