Hi,
On execution of the following code snippet, I get an error as
"Magic number checking on storable file failed at blib/lib/Storable.pm
(autosplit into blib/lib/auto/Storable/fd_retrieve.al) line 297"
The code snippet is like:
while(1)
{
my ($rouName, $argsRef);
eval
{
$rouName = Storable::fd_retrieve($self->{readFd}); # ----> Error
line
if (!defined($rouName))
{
die "IO Error";
}
};
if ($EVAL_ERROR =~ /IO Error/)
{
$errorHandle = CreateError( $COSPRC_IO_ERR
,$cosprcErrorTexts{$COSPRC_IO_ERR}
,$errorHandle
,"Storable::fd_retrieve
failed in child for pipe $self->{readFd}"
);
WriteAndClearError($errorHandle);
exit(1);
}
.
.
.
.
I guess 'eval' should be used to avoid "Magic number checking..." error.
But the above code already contains 'eval' and still the error exists.
Any help on how to eliminate this error?
Thanks all in advance...
Nithya
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
