Select Code to Download

   # This is free hand, please ignore typos:
   my $templateContents = { hosts => 
...
       },
       ...
   }

use strict ;
use warnings ;
...
my $template = Template->new();
$template->process($file, $vars)
    || die "Template process failed: ", $template->error(), "\n" ;

<?xml version="1.0" encoding="ISO-8859-1"?>
<workbook>
...
[% END %]
  </worksheet>
</workbook>

<workbook>
  <worksheet name=""><format color="black">
...

  </worksheet>
</workbook>