技术头条 - 一个快速在微博传播文章的方式     搜索本站
您现在的位置首页 --> 其他 --> perl的写excel文件

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();

建议继续学习:

  1. JQuery实现Excel表格呈现    (阅读:46516)
  2. 神马?用excel来做项目管理?    (阅读:42212)
  3. perl更新/修改/删除文本文件内容    (阅读:9424)
  4. perl大牛flw传说    (阅读:6506)
  5. perl模块Getopt::Std用法及实例-从命令行读取参数模块    (阅读:5867)
  6. [Perl] Template::Toolkit 模板技术.    (阅读:5361)
  7. 在perl中连接和使用sqlite做数据存储    (阅读:5040)
  8. Perl命令行常见用法及技巧    (阅读:4792)
  9. perl的expect使用方法,实现非交互式登录。    (阅读:4479)
  10. perl模块之MIME::Lite发送有附件的邮件    (阅读:4433)
QQ技术交流群:445447336,欢迎加入!
扫一扫订阅我的微信号:IT技术博客大学习
© 2009 - 2024 by blogread.cn 微博:@IT技术博客大学习

京ICP备15002552号-1