操作excel的perl模块
来源:互联网 发布:淘宝上卖龙猫公仔的店 编辑:程序博客网 时间:2024/05/21 06:36
CPAN上提供了Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel这两个模块。下面我们就来看看Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel的使用方法:
在Linux或者Unix上操作(生成)Excel,怎么说都是比较困难的困难的事情。但是有cpan,困难迎刃而解了!CPAN上提供了Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel这两个模块。下面我们就来看看Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel的使用方法:
1、首先,我们要在服务器上安装相应的模块
安装 Excel 模块的 PPM 命令
- ppm> install OLE::Storage_Lite
- ppm> install Spreadsheet::ParseExcel
- ppm> install Spreadsheet::WriteExcel
ppm> install OLE::Storage_Liteppm> install Spreadsheet::ParseExcelppm> install Spreadsheet::WriteExcel
2、使用读取EXCEL文件:
- #!/usr/bin/perl -w
- use strict;
- use Spreadsheet::ParseExcel;
- my $parser = Spreadsheet::ParseExcel->new();
- my $workbook = $parser->Parse('Book1.xls');
- for my $worksheet ( $workbook->worksheets() ) {
- my ( $row_min, $row_max ) = $worksheet->row_range();
- my ( $col_min, $col_max ) = $worksheet->col_range();
- for my $row ( $row_min .. $row_max ) {
- for my $col ( $col_min .. $col_max ) {
- my $cell = $worksheet->get_cell( $row, $col );
- next unless $cell;
- print "Row, Col = ($row, $col)\n";
- print "Value = ", $cell->value(), "\n";
- print "Unformatted = ", $cell->unformatted(), "\n";
- print "\n";
- }
- }
- }
#!/usr/bin/perl -w use strict; use Spreadsheet::ParseExcel; my $parser = Spreadsheet::ParseExcel->new(); my $workbook = $parser->Parse('Book1.xls'); for my $worksheet ( $workbook->worksheets() ) { my ( $row_min, $row_max ) = $worksheet->row_range(); my ( $col_min, $col_max ) = $worksheet->col_range(); for my $row ( $row_min .. $row_max ) { for my $col ( $col_min .. $col_max ) { my $cell = $worksheet->get_cell( $row, $col ); next unless $cell; print "Row, Col = ($row, $col)\n"; print "Value = ", $cell->value(), "\n"; print "Unformatted = ", $cell->unformatted(), "\n"; print "\n"; } } }
3、生成EXCEL文件:
- #!/usr/bin/perl -w
- use Spreadsheet::WriteExcel;
- # 创建一个新的EXCEL文件
- my $workbook = Spreadsheet::WriteExcel->new('test.xls');
- # 添加一个工作表
- $worksheet = $workbook->add_worksheet();
- # 新建一个样式
- $format = $workbook->add_format(); # Add a format
- $format->set_bold();#设置字体为粗体
- $format->set_color('red');#设置单元格前景色为红色
- $format->set_align('center');#设置单元格居中
- #使用行号及列号,向单元格写入一个格式化和末格式化的字符串
- $col = $row = 0;
- $worksheet->write($row, $col, 'Hi Excel!', $format);
- $worksheet->write(1, $col, 'Hi Excel!');
- # 使用单元格名称(例:A1),向单元格中写一个数字。
- $worksheet->write('A3', 1.2345);
- $worksheet->write('A4', '=SIN(PI()/4)');
- exit;
- 操作excel的perl模块
- Perl操作excel2007的模块
- Perl对Excel文件的各种操作
- perl的EXCEL操作初级学习总结
- 一个perl操作excel的例子
- 用perl操作excel的介绍
- Perl 操作Excel
- Perl 操作Excel总结
- Perl操作Excel文档
- Perl 操作 excel
- perl 操作excel范例
- 操作指定文件格式的10个Perl CPAN模块
- perl win32::ole 操作excel
- python各个操作excel模块的对比
- Perl OLE Excel Date格式的数据操作
- Perl模块的安装
- Perl模块的维护
- 卸载perl的模块
- 思念如风
- 二叉树知识复习
- Waitqueue、Event及Semaphore的实现机制分析
- signed
- Ubuntu 11.04 (Natty Narwhal)图形安装教程、基本设置、网络设置、软件源、开启Unity、ubuntu文档
- 操作excel的perl模块
- CSS伪类原理极其应用
- Android的崛起之路与束足之绳
- 信号灯与自旋锁对比。
- c++只在基类中用虚析构函数的原因
- Flex删除文件 SecurityError: fileWriteResource
- CryptAPI 数字签名 与 Openssl 验证签名
- 关于php中include和require的问题
- Android应用程序版本号管理.(官方文档中文版)