H.Merijn Brand writes:
> On Fri 13 Jul 2001 16:17, Michael Peppler <[EMAIL PROTECTED]> wrote:
> > #!/usr/local/bin/perl -w
> >
> > use DBI;
> >
> > DBI->trace(3);
> >
> > $dbh = DBI->connect('dbi:Sybase:kiruna', 'sa', '');
> >
> > $dbh->disconnect;
>
> can you see any difference when you narrow the scope?
>
> --8<---
> #!/usr/bin/perl -w
>
> use strict;
> use DBI;
> DBI->trace (3);
> { my $dbh = DBI->connect ("dbi:Sybase:kiruna", "sa", "");
> $dbh->disconnect;
> }
> -->8---
Works fine.
> or if you explicitly destroy the handle?
>
> --8<---
> :
> :
> $dbh->disconnect;
> undef $dbh;
> -->8---
Works fine.
> The same goes for statement handles:
>
> --8<---
> my $dbh = DBI->connect (...);
>
> { my $sth = $dbh->prepare ("select ...");
> $sth->bind_columns (...);
> while ($sth->fetch) {
> :
> }
> }
> -->8---
Works fine.
All of these are of course driven by DBI, which just calls the
disconnect/destroy method in the Sybase module.
Michael
--
Michael Peppler - Data Migrations Inc. - http://www.mbay.net/~mpeppler
[EMAIL PROTECTED] - [EMAIL PROTECTED]
International Sybase User Group - http://www.isug.com
