perl的写excel文件
浏览:2954次 出处信息
因为工作需要,给一些内容的结果需要转换成excel给上面看,所以用perl来实现这个事件,发现perl来写excel实在是太容易了。。我真想学老罗的讲”太容易了,实在是太容易了”.
在 2000 年,Takanori Kawai 和 John McNamara 编写出了 Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel 模块并将它们张贴在 CPAN 上,这两个模块使得在任何平台上从 Excel 文件抽取数据成为可能。
下面就是这个模块的内容.
以下是代码片段:
#!/usr/bin/perl
use strict;
use warnings;
use Encode;
use Spreadsheet::WriteExcel;
# 设置new一个对象出来,并写上需要存成什么名字的xls
my $xls = Spreadsheet::WriteExcel->new( "fukaiss.xls" );
# xml的内容名字
my $xlsContent = $xls->add_worksheet( ’report’ );
# 这是对格式的设置,我们可以设置一个标题的,一个内容的,
# 我现在只设置一个内容
my $contentStyle = $xls->add_format();
$contentStyle->set_size( 8 );
$contentStyle->set_bold();
$contentStyle->set_align( ’center’ );
# 写表内容(格式是使用上面添加的表格式)
# 这个中的A,B,C是设置的excel中上面行的字母
# 这个地方中的文字我用了decode这样中文才能正常显示
# 最后面的contentStyle是我上面设置的行风格
$xlsContent->write( "A1", decode( ’utf8’, "名字" ), $contentStyle );
$xlsContent->write( "B1", decode( ’utf8’, "时间" ), $contentStyle );
$xlsContent->write( "C2", decode( ’utf8’, "语言" ), $contentStyle );
#这是关闭,上面的内容设置成循环就能生成很多行了
$xls->close();
建议继续学习:
- JQuery实现Excel表格呈现 (阅读:46516)
- 神马?用excel来做项目管理? (阅读:42212)
- perl更新/修改/删除文本文件内容 (阅读:9424)
- perl大牛flw传说 (阅读:6506)
- perl模块Getopt::Std用法及实例-从命令行读取参数模块 (阅读:5867)
- [Perl] Template::Toolkit 模板技术. (阅读:5361)
- 在perl中连接和使用sqlite做数据存储 (阅读:5040)
- Perl命令行常见用法及技巧 (阅读:4792)
- perl的expect使用方法,实现非交互式登录。 (阅读:4479)
- perl模块之MIME::Lite发送有附件的邮件 (阅读:4433)
QQ技术交流群:445447336,欢迎加入!
扫一扫订阅我的微信号:IT技术博客大学习
扫一扫订阅我的微信号:IT技术博客大学习
<< 前一篇:Perl Advent的文章总结
后一篇:快些,在快些,perl的小优化 >>
文章信息
- 作者:扶凯 来源: 扶凯
- 标签: excel perl
- 发布时间:2009-12-17 22:12:03
建议继续学习
近3天十大热文
- [67] Go Reflect 性能
- [67] Oracle MTS模式下 进程地址与会话信
- [67] 如何拿下简短的域名
- [61] IOS安全–浅谈关于IOS加固的几种方法
- [60] 图书馆的世界纪录
- [59] 【社会化设计】自我(self)部分――欢迎区
- [58] android 开发入门
- [56] 视觉调整-设计师 vs. 逻辑
- [49] 给自己的字体课(一)——英文字体基础
- [47] 界面设计速成