RE: Warnings with Spreadsheet::WriteExcel

[NandKishore.Sagi]

Never mind guys.

I figured it out. 

The row and col value were not set and as a result I got a screenful
:D....

Thanks for any time you spent on this issue.

Nand Kishore

-----Original Message-----
From: NandKishore.Sagi [mailto:[EMAIL PROTECTED] 
Sent: Thursday, July 29, 2004 3:33 PM
To: [EMAIL PROTECTED]
Subject: RE: Warnings with Spreadsheet::WriteExcel
Importance: High


I guess the script was not recieved by you guys. Here is the script I
have written.
 
#! /opt/3d/bin/perl -w
 
use strict ;
use warnings ;
use Spreadsheet::WriteExcel;
 
my $workbook ;
my $worksheet ;
my $format ;
my $row ;
my $col ;
my $host ;
 
$workbook = Spreadsheet::WriteExcel->new("dclist.xls") ;
die "Problems creating new Excel file: $!" unless defined $workbook;
 
$format = $workbook->add_format(); # Add a format $format->set_bold();
$format->set_color('red'); $format->set_align('left');
 
for my $host qw(app0552 app0555 app0557 app0556 app0558 app0560 app0579
app0580 app0587 app0588 app3801 app3803 app3804) {
        $worksheet = $workbook->add_worksheet($host) ;
        $worksheet->write($row , $col , "This is for DC $host" ,
$format); }

        -----Original Message-----
        From: NandKishore.Sagi [mailto:[EMAIL PROTECTED] 
        Sent: Thursday, July 29, 2004 3:27 PM
        To: [EMAIL PROTECTED]
        Subject: Warnings with Spreadsheet::WriteExcel
        Importance: High
        
        
        Hi All ,
                
                    I am in process of generating some statistics for
different unix boxes. I would like to generate excel workbook with a
single worksheet for each box. I had written a test script to create the
excel sheet. I was able to create the excel sheet but I encountered some
warnings message as the script was executing. I have herewith attached
the script and the warning messages. There is no problem right now but I
was just wondering why so many error messages popped up. 
         
                    Also I had just now installed the module. So is it
that the installation was wrong or partial ? I did not see the
installation progress. My mistake.
         
        Thanks for any inputs.
         
        Thanks and Regards
        Nand Kishore S
         
        Nand Kishore Sagi
        ART Support Team
        (612)-304-BART


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>