Select Code to Download

my $excel = Win32::OLE->new('Excel.Application');
my $workbook = $excel->Workbooks->Add($absolute_path_to_excel_filename
+);
my $first_worksheet = $workbook->Sheets(1);
$first_worksheet->PrintOut();