[PerlChina] Want to get a module

[Wan]

#!/usr/bin/perl
use Win32::OLE;
my $ex = Win32::OLE->new('Excel.Application') or die "oops\n";
#$ex->{Visible} = 1;
my $wb = $ex->Workbooks->Open("D:/new.xls");
my $sheet = $wb->Worksheets(1);
$sheet->cells(1,1)->{value} = "哈哈，不到10分钟就可以挣100块钱，幸福啊";
$sheet->cells(2,1)->{value} = "不过这样拿你钱好像有点好像有点残忍";
$wb->Save;
$wb->Close;
$ex->Quit;

你在网上查一下Excel.Application