MySQL og PERL på debian

apt-get install libdbd-mysql-perl libdbi-perl

my($dbh) = DBI->connect('DBI:mysql:databasenavn','bruger,'password');

har du ikk lige et eksempel på hvordan man laver en select, update, insert :) .. så smider jeg lige et par ekstra point efter dig :D

fra "perldoc DBI" (som er din ven i dette tilfælde)

        use DBI;

        @driver_names = DBI->available_drivers;
        @data_sources = DBI->data_sources($driver_name, \%attr);

        $dbh = DBI->connect($data_source, $username, $auth, \%attr);

        $rv  = $dbh->do($statement);
        $rv  = $dbh->do($statement, \%attr);
        $rv  = $dbh->do($statement, \%attr, @bind_values);

        $ary_ref  = $dbh->selectall_arrayref($statement);
        $hash_ref = $dbh->selectall_hashref($statement, $key_field);

        $ary_ref = $dbh->selectcol_arrayref($statement);
        $ary_ref = $dbh->selectcol_arrayref($statement, \%attr);

        @row_ary  = $dbh->selectrow_array($statement);
        $ary_ref  = $dbh->selectrow_arrayref($statement);
        $hash_ref = $dbh->selectrow_hashref($statement);

        $sth = $dbh->prepare($statement);
        $sth = $dbh->prepare_cached($statement);

        $rc = $sth->bind_param($p_num, $bind_value);
        $rc = $sth->bind_param($p_num, $bind_value, $bind_type);
        $rc = $sth->bind_param($p_num, $bind_value, \%attr);

        $rv = $sth->execute;
        $rv = $sth->execute(@bind_values);

        $rc = $sth->bind_param_array($p_num, $bind_values, \%attr);
        $rv = $sth->execute_array(\%attr);
        $rv = $sth->execute_array(\%attr, @bind_values);

        $rc = $sth->bind_col($col_num, \$col_variable);
        $rc = $sth->bind_columns(@list_of_refs_to_vars_to_bind);

        @row_ary  = $sth->fetchrow_array;
        $ary_ref  = $sth->fetchrow_arrayref;
        $hash_ref = $sth->fetchrow_hashref;

        $ary_ref  = $sth->fetchall_arrayref;
        $ary_ref  = $sth->fetchall_arrayref( $slice, $max_rows );

        $hash_ref = $sth->fetchall_hashref( $key_field );

        $rv  = $sth->rows;

        $rc  = $dbh->begin_work;
        $rc  = $dbh->commit;
        $rc  = $dbh->rollback;

        $quoted_string = $dbh->quote($string);

        $rc  = $h->err;
        $str = $h->errstr;
        $rv  = $h->state;

        $rc  = $dbh->disconnect;

ellers kan jeg anbefale bogen

Programming the Perl DBI
Forlag: O'Reilly and Associates
Forfattere: Alligator Descates og Tim Bunce
ISBN: 1-56592-699-4

Super lækkert :)

Dette site kan også anbefales: http://www.perldoc.com/cpan/DBI.html

Jeg har sku fået skrevet et helt SQL library nu, det er så najs :D

Skriv et svar i dette spørgsmål:

MySQL og PERL på debian - Ekstra point til thomasledet - 275401

Så er der 100 ponint ekstra til dig, for din super hjælp :D