print "When finished editing, close the file.\n"; sleep 3; $excel->{Visible} = 1; while ($excel->ActiveWorkbook) { sleep 10; }