Help for this page

Select Code to Download


  1. or download this
    package DBIx::Handy;

...
}

1;
  2. or download this
    my $DB = DBIx::Handy->new({database     => 'autoreorder',
                               auto_connect => 'startup',
                               driver       => 'mysql',
                               username     => 'alex'});
  3. or download this
    my $r = CGI->new();
my $form_data = $r->Vars();
...

$DB->insert(table  => 'customers',
            data   => $form_data);
  4. or download this
    my $res = $self->{_DB}->execute(
              sql => 'SELECT * FROM customers WHERE email = ?',
...
while($row = $STH->fetchrow_hashref()){
    # ....
}