para

use DB::MySQL::Converter;
use DB::MySQL::Native;
use DB::Result;

role DB::MySQL::Result does DB::Result
{
    has MYSQL_RES $.result is required;
    has $.num-fields = $!result.num-fields;
    has $.fields = $!result.fetch-fields;

    method names() { do for ^$!num-fields { $!fields[$_].name } }
}

class DB::MySQL::NonStatementResult does DB::MySQL::Result
{
    has $.db is required;

    method finish() { $.free; .finish with $!db }  # free db instead of sth

    method free()
    {
        .free with $!result;
        $!result = Nil
    }

    method row()
    {
        my $row = $!result.fetch-row // return ();
        my $lengths = $!result.fetch-lengths;

        do for ^$!num-fields -> $i
        {
            my $val = DB::MySQL::Converter.value(
                $!fields[$i].type, $row[$i], $lengths[$i]);
        }
    }
}

class DB::MySQL::StatementResult does DB::MySQL::Result
{
    has MYSQL_STMT $.stmt is required;
    has DB::MySQL::Native::ResultsBind $.result-bind;

    method free()
    {
        .free with $!result-bind;
        .free with $!result;
        $!result-bind = Nil;
        $!result = Nil;
    }

    submethod TWEAK()
    {
        $!result-bind = DB::MySQL::Native::ResultsBind.new(:count($!num-fields));

        for ^$!num-fields -> $i
        {
            DB::MySQL::Converter.make-buffer($!result-bind[$i], $!fields[$i])
        }

        $!stmt.check if $!stmt.bind-result($!result-bind[0]);
    }

    method row(Bool :$hash)
    {
        if (my $res = $!stmt.fetch) == 0
        {
            do for ^$!num-fields -> $i
            {
                DB::MySQL::Converter.bind-value($!fields[$i].type,
                                                $!result-bind[$i],
                                                null => ?$!result-bind.nulls[$i])
            }
        }
        else
        {
            given $res
            {
                when 1 { $!stmt.check }
                when MYSQL_NO_DATA { return () }
                when MYSQL_DATA_TRUNCATED { die "truncated" }
            }
        }
    }
}



head

DB::MySQL::Result -- Results from a MySQL query


say $results.num-fields; # Number of column fields
say $results.keys;       # Array of column field keys


say $results.value;      # A single scalar value


say $results.array;      # A single array with one row


say $results.hash;       # A single hash with one row


say $results.arrays;     # A sequence of arrays with all rows


say $results.hashes;     # A sequence of hashes with all rows


$results.finish;         # Only needed if results aren't consumed.


Returned from a C<DB::MySQL::Statement> execution that returns
results.  There are two flavors, C<DB::MySQL::StatementResult>
returned from a prepared statement, and
C<DB::MySQL::NonStatementResult> returned from an B<execute>(),
but they act the same.


If the execute was passed the C<:store> flag (normally C<True> by
default), the results are all retrieved from the server at once,
then doled out as requested.  If C<:store> is set to C<False>,
each row is retrieved from the server on request.  This can tie
up server resources so results should be consumed quickly.  Read
the MySQL documentation for more details on the distinction.


Returns the number of fields in each row.


Array of the names of the columns (fields) to be returned.


Finish the database connection.  This is only needed if the complete
database returns aren't consumed.


Return a single scalar value from the results.


Return a single row from the results as an array.


Return a single row from the results as a hash.


Return a sequence of all rows as arrays.


Return a sequence of all rows as hashes.


root

Statement

Connection

React

=begin React :component<HeaderCol> :id<menu> 
=para L<Documentation|/doc/introduction>
=para L<Modules| /mods>
=para L<Examples| file:../examples/index.podlite>
=para L<AI|file:../mcp/index.podlite>
=para L<Download |file:../download/index.podlite>
=para L<About|file:../about/index.podlite>
=para 🔍 K<⌘K>/K<ctrl-K>
=end React


=begin React :component<HeaderCol> :id<footer>  
=begin nested :!nested
=item1 B<Language>
    =item2 L<Get started|file:../getting-started/getting-started.podlite>
    =item2 L<Why Raku?|/doc/language/faq#Why-should-I-learn-Raku-What's-so-great-about-it>
    =item2 L<Try Raku|https://glot.io/new/raku>
    =item2 L<Download | file:../download/index.podlite>
    =item2 L<Raku cheat sheet|https://github.com/Raku/mu/blob/master/docs/Perl6/Cheatsheet/cheatsheet.txt>
    =item2 L<Raku on Exercism|https://exercism.org/tracks/raku>
    =item2 L<Wikipedia|https://en.wikipedia.org/wiki/Raku_(programming_language)>

=end nested
=begin nested :!nested

=item1 B<L<Documentation|/doc>>
    =item2 L<Getting started, Migration guides from other languages, & Tutorials | file:../doc/introduction.podlite>
    =item2 L<Language References|file:../doc/reference.podlite>
    =item2 L<Type Reference| file:../doc/types.podlite>
    =item2 L<Miscellaneous| file:../doc/miscellaneous.podlite>
    =item2 L<FAQs (Frequently Asked Questions)|/doc/language/faq>
    =item2 L<Community|/doc/language/community>
    =item2 L<The list of all documents|file:../doc/index.podlite>
    =item2 L<Hand these documents to an AI assistant|file:../mcp/index.podlite>

=end nested
=begin nested :!nested
=item1 B<Learning>
    =item2 L<The Raku Guide|https://raku.guide/>
    =item2 L<Wikibook |https://en.wikibooks.org/wiki/Raku_Programming>
    =item2 L<Books |https://perl6book.com/>
    =item2 L<Rosetta Code | https://www.raku.org/community/rosettacode>
    =item2 L<Learn Raku in Y minutes|https://learnxinyminutes.com/docs/raku/>
    =item2 L<Golfing |https://github.com/AlexDaniel/raku-golf-cheatsheet>
=end nested
=begin nested :!nested

=item1 B<Explore>
    =item2 L<Raku Blog Aggregator|https://planet.raku.org/>
    =item2 L<Rakudo Weekly|https://rakudoweekly.blog/>
    =item2 L<The Weekly Challenge |https://perlweeklychallenge.org/>
    =item2 L<Raku Advent Calendar|https://raku-advent.blog/>

=end nested
=end React


Built with L<Podlite|https://podlite.org> — the markup and publishing tools behind this site.


=begin React :component<CookieConsent> :id<CookieConsent> :buttonCaption("Got it!")
=para
This website uses cookies for analytics.
=end React


Result

NAME

SYNOPSIS

DESCRIPTION

METHODS

num-fields()

keys()

finish()

value()

array()

hash()

arrays()

hashes()

DB::MySQL v0.8

Authors

License

Dependencies

Test Dependencies

Provides

Documentation