use Spreadsheet::WriteExcel;

    # Create a new Excel workbook
    my $workbook = Spreadsheet::WriteExcel->new('out.xls');

    # Add a worksheet
    $worksheet = $workbook->add_worksheet();
    $worksheet->write('A24', 'Label');
    $worksheet->write('B24', 'Value1');
    $worksheet->write('C24', 'Value2');
    $worksheet->write('D24', 'Value3');
    $worksheet->write('E24', '=EXACT(B24,D24)');