Perl and XLS operation

Hi All,
 
   I want to write a perl script which let me override/edit the existing
or created XLS.  But I am unable to do that. I am not sure, do I have to
use few more CPAN module or what your help will be
appreciated. Please find the snippet of the code which I have for the
creation of the XL sheet for your kind reference as below.
 
#!/usr/bin/perl -w

 
######################################################################
        #
        # Example of how to use the Spreadsheet::WriteExcel module to
create
        # an Excel binary file.
        #

        use strict;
        use Spreadsheet::WriteExcel;

        # Create a new Excel workbook called perl.xls
        my $workbook = Spreadsheet::WriteExcel->new("perl.xls");

        # Add some worksheets
        my $sheet1 = $workbook->add_worksheet();my $sheet1 =
$workbook->add_worksheet();
                  # error comes when I change above line as below, while
editing 
                  # my $sheet1 = $workbook->add_worksheet("Derive");

        my $sheet2 = $workbook->add_worksheet("Example");

        # Add a Format
        my $format = $workbook->add_format();
        $format->set_bold();
        $format->set_size(15);
        $format->set_color('blue');
        $format->set_align('center');

        # Set the width of the first column in Sheet3
        $sheet2->set_column(0, 0, 30);

        # Set Sheet2 as the active worksheet
        $sheet2->activate();

        # The general syntax is write($row, $col, $token, $format)

        # Write some formatted text
        $sheet2->write(0, 0, "Hello Excel!", $format);

        # Write some unformatted text
        $sheet2->write(2, 0, "One");
        $sheet2->write(3, 0, "Two");

        # Write some unformatted numbers
        $sheet2->write(4, 0, 3);
        $sheet2->write(5, 0, 4.00001);

        # Write a number formatted as a date
        my $date = $workbook->add_format();
        $date->set_num_format('mmmm d yyyy h:mm AM/PM');
        $sheet2->write(7, 0, 36050.1875, $date);

Here, at first time I am able to open a XLS and write to that, but if I
want to do some changes next time, then it is not allowing me to do
that.
and getting the follwing error.
 
C:\Documents and Settings\x0069183\Desktop\Mustafa>perl hello.pl 
Can't open perl.xls. It may be in use or protected at hello.pl line 13
        (in cleanup) Can't use string ("") as a symbol ref while "strict
refs" in use at C:/Perl/site/lib/Spreadsheet/WriteExcel/Workbook.pm line
295.
Can't call method "add_worksheet" on an undefined value at hello.pl line
16.
 
Here I have used the module spreadsheat::WriteExcel.
 
Please let me know how to overcome this. 
 
 
 
--
Regards,
Mustafa
 

Please do not print this email unless it is absolutely necessary. 

The information contained in this electronic message and any attachments to this message are intended for the exclusive use of the addressee(s) and may contain proprietary, confidential or privileged information. If you are not the intended recipient, you should not disseminate, distribute or copy this e-mail. Please notify the sender immediately and destroy all copies of this message and any attachments. 

WARNING: Computer viruses can be transmitted via email. The recipient should check this email and any attachments for the presence of viruses. The company accepts no liability for any damage caused by any virus transmitted by this email. 

www.wipro.com

_______________________________________________
Perl-XML mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs