You can use Spreadsheet::ParseExcel to read .xls files and Spreadsheet::WriteExcel to create your merged file.

You may need to take care of formatting and the like. If your data set is large you may need to look at Spreadsheet::WriteExcel::Big.