$worksheet->merge_range(intToRange($row,$column,$row,$column+5),
			    "EDMTA Instances",$title_fmt);
  $row++;
  if ( $#edmta_instances < 0 ) { 
    $worksheet->write($row++,$column+1,"None");
  } else { 
    foreach my $edmta(@edmta_instances){
      $worksheet->write($row++,$column+1,$edmta);
    }
  }

  $row++;
  my $range = intToRange($row,$column,$row,$column+5);
  printf "%s\n",$range;
  my $title_fmt2 = $workbook->add_format(
				 valign => 'vcenter', 
					align=>'center');
  $worksheet->merge_range($range,"INET Instances",$title_fmt2);


##</code><code>##

Incorrect number of arguments at ./mailoutInventory.pl line 285
Use of uninitialized value in numeric eq (==) at /usr/lib/perl5/site_perl/5.14.2/Spreadsheet/WriteExcel/Workbook.pm line 1545 during global destruction.
        (in cleanup) Can't call method "_prepare_images" on unblessed reference at /usr/lib/perl5/site_perl/5.14.2/Spreadsheet/WriteExcel/Workbook.pm line 1546 during global destruction.