mysql导出脚本自动生成word 数据字段perl工具

#!perl -w use strict; use utf8; use open ':encoding(gbk)', ':std'; use open ':encoding(utf8)'; use Win32::OLE; use Win32::OLE::Const 'Microsoft.Word'; # wd constants my $word = Win32::OLE->new("Word.A

>>阅读原文<<