
June 21st, 2000, 02:30 AM
|
|
Junior Member
|
|
Join Date: Jun 2000
Posts: 3
Time spent in forums: < 1 sec
Reputation Power: 0
|
|
|
Dear,
I have a problem with a script, when one has to script.pl store the message $var to the database opened up as:
dbmopen(%box, $inbox, 0600);
if (!($box{'MESSAGES'})) { $box{'MESSAGES'} = "0"; }
@messagelist = split(/t/, $box{'MESSAGES'});
$nextmess = greatest(@messagelist);
$nextmess++;
$box{$nextmess} = $message; <--"HERE CRASH the script".
$box{'MESSAGES'} .= "t$nextmess";
dbmclose(%box);
the information of the error appears is:
sdbm store returned -1, errno 22, key "5" at
/home/httpd/html/server1/cgi-bin/files/script.pl line
110, <STDIN> chunk 139.
this error takes place when the variable $message is very big (1024)??? certain that is???
need reinstall the PERL or some module (DBM, SDBM) ??
is there some solution for this great problem?? please
help me.
i have perl 5.4 on linux redhat
thank you for all
!!!!!!!!!!!!!!!!
|