Modules that make creating and formatting xls files straight forward:

use Excel::Writer::XLSX; (Excel 2007+)

use Spreadsheet::WriteExcel; (Excel 2004-)

See "Keep Leading Zero's" in either module for a good solution.