In my input I have few cells have data seperated by a new line ( That's the way it looks). When I open the output file in Excel it looks like that it replaces that data with a single line with subtituting a square shaped character where there was new line in the input. When I 'click' on that with the mouse, it looks exactly same as in input.

If necessary, the data can be manipulted in the program to have it automatically display without clicking.

How I can achieve that..?

The code is

use strict;
use warnings;
use Spreadsheet::ParseExcel::Simple;
use Spreadsheet::WriteExcel::Simple;

#IN
my $file = 'infile.xls';
my $xls = Spreadsheet::ParseExcel::Simple->read($file);

#OUT
my $ss = Spreadsheet::WriteExcel::Simple->new();
my $count;
foreach my $sheet ($xls->sheets) {
    while ($sheet->has_data) {  
    #Reading
    my @idata = $sheet->next_row;
    @odata = @idata;  # Here I can manipulate the data

    #Writing
    $ss->write_row(\@odata);
    last if $count++ > 5;
    }
}
print $ss->data;
[download]

2003-04-29 edit ybiC: retitle from "Spradsheet Parsing problem"