加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

如何使用perl操作excel

发布时间:2020-12-15 23:55:22 所属栏目:大数据 来源:网络整理
导读:在Linux或者Unix上操作(生成)Excel,怎么说都是比较困难的困难的事情。但是有cpan,困难迎刃而解了!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 命令

Java代码?

  1. ppm>?install?OLE::Storage_Lite ??
  2. ppm>?install?Spreadsheet::ParseExcel ??
  3. ppm>?install?Spreadsheet::WriteExcel??

?2、使用读取EXCEL文 件:

Ruby代码?#!/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文 件:

    ?

    1. use?Spreadsheet::WriteExcel; ??
    2. ?#?创建一个新的EXCEL文件???
    3. ?my?$workbook?=?Spreadsheet::WriteExcel->new('test.xls'); ??
    4. ?#?添加一个名为temp工作表???
    5. ?$worksheet?=?$workbook->add_worksheet(‘temp’); ??
    6. ?#??新建一个样式???
    7. ?$format?=?$workbook->add_format();?#?Add?a?format???
    8. ?$format->set_bold();#设置字体为粗体???
    9. ?$format->set_color('red');#设置单元格前景色为红色???
    10. ?$format->set_align('center');#设置单元格居中???
    11. #使用行号及列号,向单元格写入一个格式化和末格式化的字 符串???
    12. ?$col?=?$row?=?0; ??
    13. ?$worksheet->write($row,?$col,?'Hi?Excel!',?$format); ??
    14. ?$worksheet->write(1,????$col,?'Hi?Excel!'); ??
    15. ?#?使用单元格名称(例:A1),向单元格中写一个数 字。???
    16. ?$worksheet->write('A3',?1.2345); ??
    17. ?$worksheet->write('A4',?'=SIN(PI()/4)'); ??
    18. ?exit;???

    [ From :]?http://clchun.javaeye.com/blog/327252

    (编辑:李大同)

    【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

      推荐文章
        热点阅读