use Win32::OLE;
my $ex = Win32::OLE->new('Excel.Application') or die "oops\n";
my $obj = Win32::OLE->GetObject("C:\\TEMP\\text.txt");