Re: [Monetdb-developers] [Monetdb-checkins] clients/src/perl Mapi.pm, , 1.5, 1.6
Sjoerd Mullender wrote:
Update of /cvsroot/monetdb/clients/src/perl In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv29671/src/perl
Modified Files: Mapi.pm Log Message: propagated changes of Wednesday Sep 10 2008 - Friday Sep 12 2008 from the Clients_1-24 branch to the development trunk
2008/09/10 - mr-meltdown: src/perl/Mapi.pm,1.5.4.1 Implemented redirect support in Mapi.pm. While testing I hit the following error which I don't know what it means (let alone how to fix it): Can't use string ("Xexport 1 100 100") as a HASH ref while "strict refs" in use at Mapi.pm line 352, <> line 2.
I just noticed this log message. Could the cause be that in Mapi.pm there is one place where the function putblock is called *without* $self-> in front of it, and that is exactly the only occurrence of the string "Xexport" in the complete source? My guess is that unpacking the arguments in the putblock function causes the error message.
Can you test this?
On 12-09-2008 11:27:45 +0200, Sjoerd Mullender wrote:
Can't use string ("Xexport 1 100 100") as a HASH ref while "strict refs" in use at Mapi.pm line 352, <> line 2.
I just noticed this log message. Could the cause be that in Mapi.pm there is one place where the function putblock is called *without* $self-> in front of it, and that is exactly the only occurrence of the string "Xexport" in the complete source? My guess is that unpacking the arguments in the putblock function causes the error message.
Can you test this?
I don't have a clue what you're talking about. I think it may have to do with me using Perl 5.10.0, which appears to be more strict for many apps than 5.8.*.
I found this when doing a select * from types using the perl mclient. Aparently there are more types than the default block size.
Fabian Groffen wrote:
On 12-09-2008 11:27:45 +0200, Sjoerd Mullender wrote:
Can't use string ("Xexport 1 100 100") as a HASH ref while "strict refs" in use at Mapi.pm line 352, <> line 2.
I just noticed this log message. Could the cause be that in Mapi.pm there is one place where the function putblock is called *without* $self-> in front of it, and that is exactly the only occurrence of the string "Xexport" in the complete source? My guess is that unpacking the arguments in the putblock function causes the error message.
Can you test this?
I don't have a clue what you're talking about. I think it may have to do with me using Perl 5.10.0, which appears to be more strict for many apps than 5.8.*.
I found this when doing a select * from types using the perl mclient. Aparently there are more types than the default block size.
sed -i '/Xexport/s/putblock/$self->putblock/' src/perl/Mapi.pm
On 12-09-2008 13:18:32 +0200, Sjoerd Mullender wrote:
sed -i '/Xexport/s/putblock/$self->putblock/' src/perl/Mapi.pm
(pegasus:clients/src/perl) fabian% sed -i '/Xexport/s/putblock/$self->putblock/' Mapi.pm (pegasus:clients/src/perl) fabian% ./mclient.pl !please specify a database (pegasus:clients/src/perl) fabian% ./mclient.pl sdss
select * from tables;
[ 978, "schemas", 977, NULL, 0, true, 0, 0 ] ... [ 7525, "spt_datatype_info", 977, NULL, 0, false, 0, 0 ]
\q
No more error/warning. I'll commit it.
participants (2)
-
Fabian Groffen -
Sjoerd Mullender