user poolboi <code> use Win32::OLE::Const; use Win32::OLE::Const 'Microsoft Excel'; my $Excel = Win32::OLE->new("Excel.Application" , sub { $_[0]->Quit } +) or die Win32::OLE::LastError; $Excel->{Visible} = 1; my $Book = $Excel->Workbooks->Open("C:\\Documents and Settings\\clong\\Desktop\\Convert to Text file\\Quarantined_IMSIHLR2_20070611_Completed1.xls") my $Sheet = $Book->Worksheets(Quarantined_IMSIHLR2_20070611_Completed1); $Excel->{DisplayAlerts} = 0; # avoid being prompted $Sheet->SaveAs( { FileName => "C:\\Documents and Settings\\clong\\Desktop\\Convert to Text file\\test.txt" , FileFormat => xlText } +) or die Win32::OLE::LastError; $Book->Close(); $Excel->Quit; </code> 2008-06-06 04:28:44 74 672335 20