Just looks like some left-over debugging. If unsigned short
columns are fetched okay then you can probably ignore the warning.
Tim.
On Wed, Mar 12, 2003 at 05:32:07PM +0100, Stephan Harren wrote:
> I did, my first mail was:
>
> ---snip---
> > I'm working on a perl-script connecting to myqsl using the above
> > modules. This script works fine on one database-server, but if I try
> > another on (both mysql-version 3.23.55) I get a warning from Net::Mysql:
> >
> > in short at /usr/lib/perl5/site-perl/5.6.1/Net/MySQL.pm line 591.
> ---snip---
>
> while "in short at /usr/lib/perl5/site-perl/5.6.1/Net/MySQL.pm line 591" is
> the warning that I get. I know that this is a curious message (in short!?!)
> but that's why I'm asking. The code in Net::MySQL that leads to this message
> is:
>
> ---snip---
> elsif ($head == UNSIGNED_SHORT_COLUMN) {
> warn "in short"; #line 591
> my $length = unpack 'v', substr(
> $self->{packet},
> $self->{position},
> UNSIGNED_SHORT_LENGTH
> );
> $self->{position} += UNSIGNED_SHORT_LENGTH;
> return $length;
> }
> ---snip---
>
> Best regards,
>
> Stephan
>
> Am Mittwoch, 12. M�rz 2003 17:13 schrieb BAO RuiXian:
> > You still have not given out what the warning message is.
> >
> > Best
> >
> > Bao
>
> --
> Stephan Harren
> Manager Site Operations
> MFN-IS
> -------------------------------
> Phone +49 69 90554 153
> Fax +49 69 90554 111
> Cell +49 173 7011126
>
>
