use Spreadsheet::WriteExcel;

    # Create a new Excel workbook
    my $workbook = Spreadsheet::WriteExcel->new("perl.xls");

    # Add a worksheet
    $worksheet = $workbook->add_worksheet();

    #  Add and define a format
    $format = $workbook->add_format(); # Add a format
    $format->set_bold();
    $format->set_color('red');
    $format->set_align('center');

    # Write a formatted and unformatted string, row and column notatio
+n.
    $col = $row = 0;
    $worksheet->write($row, $col, "Hi Excel!", $format);
    $worksheet->write(1,    $col, "Hi Excel!");

    # Write a number and a formula using A1 notation
    $worksheet->write('A3', 1.2345);
    $worksheet->write('A4', '=SIN(PI()/4)');
[download]

Alternately, you could use Excel::Template, which uses Spreadsheet::WriteExcel.

use Excel::Template;

my $template = Excel::Template->new(
    filename => 'template.xml',
);

$template->param(
    hello => 'Hi Excel!',
    value => 1.2345,
    formula => '=SIN(PI()/4)',
);

$template->write_file('perl.xls');

--------
template.xml
--------
<workbook>
  <worksheet>
    <row>
      <bold>
        <cell><var name="hello" /></cell>
      </bold>
      <cell col="+1" text="$value" />
      <formula><var name="formula" />
    </row>

    <cell row="1" col="0"><var name="hello" /></cell>
  </worksheet>
</workbook>
[download]

I don't have all the formatting options built in, yet, but the rest of it works. It takes the same data structure as HTML::Template, so it's really good for building reports. (My current job has me using HTML::Template, Excel::Template, PDF::Template, and Graph::Template for this very purpose.)

------
We are the carpenters and bricklayers of the Information Age.

Please remember that I'm crufty and crochety. All opinions are purely mine and all code is untested, unless otherwise specified.

Hi.. Im sorry but could you teach me how do I insert this code on my perl program??

Or, if you're feeling lazy and your needs are modest, you can just output a tab-delimited text file with a ".xls" extension and Excel will happily open it without complaint. You don't even if to go through the "import" process in Excel; double-clicking the file opens it right up, at least in Excel versions from the last couple of years.

Or (again, if your needs are simple), use a comma separated format.

The naming a file .xls trick has more uses, too.

You can mark up an HTML table and apply font and centering options, and also formulas, then save it as .xls, and Excel won't complain. See this snippet for a simple example.

Formulas look like this:

  <td x:num x:fmla="=B2+1"></td>
[download]

If you're on a Win32 platform you can also use Win32::OLE I don't know if it is bulkier or less efficient than Spreadsheet::WriteExcel, but it's what I have used, in the past (well yesterday really).

Read more... (14 kB)
This script runs some queries against a SQL Server Database to create the report that is then created and formatted via Win32::OLE. This is really more than you need, but its an example of a report that uses a decent amount of features and gives you an idea of what kind of code is needed to properly format something. Writing your own is more rewarding than gutting this one and making it fit your needs, so please do so if you find this one useful.

---

Grygonos

<horn toot="Mr. Muskrat">You could always "get fancy" with it and try something like Make Multi-tab Spreadsheet from CSV files.</horn>
(Speaking of which, I should probably update that code.)

<aside>I don't toot my own horn as often as I once did.</aside>