Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Re^2: Spreadsheet::WriteExcel with CGI

by amt (Monk)
on Dec 09, 2005 at 15:56 UTC ( #515574=note: print w/replies, xml ) Need Help??

in reply to Re: Spreadsheet::WriteExcel with CGI
in thread Spreadsheet::WriteExcel with CGI

i'm getting an error for $! as "Resource temporarily Unavailable". I'm trying to write to a file using Spreadsheet::WriteExcel's write(). The $worksheet object is defined at the top of the file, but when I hit the below while loop, it won't write() and puts RTU in the $! variable.

I don't think it's a scoping issue because the $worksheet object is defined well before the while loop. My query for the information that needs to go into the doesn't choke, so I'm not writing with uninitialized variables. Would appreciate your opinion.
# At top of file my $workbook = Spreadsheet::WriteExcel->new($target); my $worksheet = $workbook->add_worksheet("Ventus_Networks_Invoice"); my $row = 0; ... # This is the header row, that prints if( $qrv > 0 ) { my $mid_header = $workbook->add_format(%oUpper,%iLeft,%iRight,%greybg,%fBold,%iLower); my $mid_theader= $workbook->add_format(%oUpper,%iLeft,%iRight,%greybg,%fBold,%iLower,%f +Twrap); $worksheet->write($row,0,'Site Name',$workbook->add_format(%oUpper,%oLeft,%iLower,%iRight,%greybg,%fB +old)); ... # After headers are printed, print data while(my @i = $sth_site->fetchrow_array() ){ $worksheet->write($row,0,$i[1], $workbook->add_format(%oLeft,%iRight,%iLower)); # Location ID # This is where $! is set to "Resource Temporarily Unavailable


Replies are listed 'Best First'.
Re^3: Spreadsheet::WriteExcel with CGI
by ChemBoy (Priest) on Dec 11, 2005 at 17:43 UTC

    I'm not all that familiar with the internal workings of S::WE, but that seems very odd. Are you sure the write() call is actually failing? I apologize if that's obvious, but I see from the documentation that it returns 0 on success, and your snippet doesn't include code that reports the error, so it seemed worth checking. Also, I haven't any other ideas at all, unless there's some bizarre issue with the filesystem your temp directory is on—I don't think I've ever seen code that produced that particular error. :-\

    If God had meant us to fly, he would *never* have given us the railroads.
        --Michael Flanders

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://515574]
[shmem]: you can break up the chain MP3::Tag->new($_)- >interpolate("\%S ") and test whether MP3::Tag->new($_) is true
[Lady_Aleena]: shmem, no to deletion.
[shmem]: can't help you there since that song is not on my bench
[Lady_Aleena]: shmem, I need to look at MP3::Tag to see how to get the date from one song.
shmem sticks himself into the envelope. gn.(1<<3) all

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (5)
As of 2017-04-23 22:21 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (432 votes). Check out past polls.