Hi Perl Gurus
I'm facing a problem. I'm using Win32::OLE and my code goes
something like this
#### some code here
Win32::OLE->Option(Warn => sub {goto CheckError});
## some other code here
for(;;)
{
### more boring lines of code in between here
CheckError:
{
print LOG "Skipping the loop bcoz I got an
error",Win32::OLE->LastError,"\n"
if(Win32::OLE->LastError);
next; ## skip the loop for any error
}
} ## end of for
## end of code
I get this error sometimes in between
Can't find label CheckError at win32excel.pl line 25.
Callback called exit.
Can somebody help please?
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
