Модуль Spreadsheet::WriteExcel используется для создания Excel-файлов на любой платформе, где может выполняться Perl. Есть возможности создания нескольких страниц в файле, форматирования текста, добавления ссылок, формул и изображений.
Полученные файлы совместимы с Excel 97, 2000, 2003 и 2007, а также в редакторах таблиц, совместимых с Linux/UNIX — Gnumeric, OpenOffice.org и т.п.
Модуль не предназначен для редактирования существующих файлов Excel.
Следующий пример наглядно демонстрирует возможности модуля:
#!/usr/bin/perl -w
use strict;
use Spreadsheet::WriteExcel;
# Создаем новый файл simple.xls и добавляем в него страницу.
my $workbook = Spreadsheet::WriteExcel->new('simple.xls');
my $worksheet = $workbook->add_worksheet();
# Общий синтаксис: write($row, $column, $token).
# Запишем текст.
$worksheet->write(0, 0, 'Hi Excel!');
# Числа...
$worksheet->write(2, 0, 3);
$worksheet->write(3, 0, 3.00000);
$worksheet->write(4, 0, 3.00001);
$worksheet->write(5, 0, 3.14159);
# И несколько формул
$worksheet->write(7, 0, '=A3 + A6');
$worksheet->write(8, 0, '=IF(A5>3,"Yes", "No")');
# А также ссылку
$worksheet->write(10, 0, '"http://www.perl.com/"
__END__
В результате выполнения кода, получаем:
Стоит отметить, что, как уже отмечалось ранее на нашем сайте, для работы с русским текстом в кодировке UTF8, стоит использовать код вида:
$name = Encode::decode_utf8($name);
Документация:
— Документация на CPAN
— Примеры программ (со скриншотами).
|
