use Spreadsheet::ParseExcel;
use Spreadsheet::ParseExcel::SaveParser;
use Spreadsheet::WriteExcel;

my $parser   = Spreadsheet::ParseExcel::SaveParser->new();
my $template = $parser->Parse('test.xls');
$template->SaveAs('test.xls');