diff options
| author | fukachan <fukachan> | 2001-03-19 14:43:00 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-03-19 14:43:00 +0000 |
| commit | 5df795d6659583d51e510e496f1c9cd2413197fa (patch) | |
| tree | 7dd59c5699f040cae0db34c798de3c3edb6849ab | |
| parent | 7b84c1c9cfa7f9a918b3de7cf52baf4ec34c5a21 (diff) | |
| download | fml8-5df795d6659583d51e510e496f1c9cd2413197fa.tar.gz fml8-5df795d6659583d51e510e496f1c9cd2413197fa.tar.bz2 fml8-5df795d6659583d51e510e496f1c9cd2413197fa.zip | |
clean up document
| -rw-r--r-- | fml/lib/IO/Adapter/MySQL.pm | 59 |
1 files changed, 59 insertions, 0 deletions
diff --git a/fml/lib/IO/Adapter/MySQL.pm b/fml/lib/IO/Adapter/MySQL.pm index 3af79e6c..28a93433 100644 --- a/fml/lib/IO/Adapter/MySQL.pm +++ b/fml/lib/IO/Adapter/MySQL.pm @@ -22,6 +22,28 @@ IO::Adapter::MySQL - interface to talk with a MySQL server =head1 SYNOPSIS + use IO::MapAdapter; + + my $map = 'mysql:toymodel'; + my $map_params = { + $map => { + sql_server => 'localhost', + user => 'fukachan', + user_password => 'uja', + database => 'fml', + table => 'ml', + params => { + ml_name => 'elena', + file => 'members', + }, + }, + }; + + my $obj = new IO::MapAdapter ($map, $map_params); + $obj->open(); + $obj->add( 'rudo@nuinui.net' ); + $obj->close(); + =head1 DESCRIPTION This module is a top level driver to talk with a MySQL server in SQL @@ -35,6 +57,10 @@ Each model name is specified at $args->{ schema } in new($args). =head2 C<configure($me, $args)> +IO::Adapter::MySQL specific configuration loader. +It also calles SQL::Schema::$model module for model specific +customizatoins and functions. + =cut sub configure @@ -122,8 +148,16 @@ sub get_next_value =head2 C<add($addr)> +add C<$addr> to the sql server specified at new(). +SQL::Schema::$model provides model specific SQL query statement. +If SQL::Schema::add() exists, SQL::Schema::add() is called. + =head2 C<delete($addr)> +delete C<$addr> from the sql server specified at new(). +SQL::Schema::$model provides model specific SQL query statement. +If SQL::Schema::delete() exists, SQL::Schema::delete() is called. + =cut @@ -161,4 +195,29 @@ sub delete } +=head1 SEE ALSO + +L<DBI>, +L<DBD::MySQL>, +L<IO::Adapter::DBI> + +=head1 AUTHOR + +Ken'ichi Fukamachi + +=head1 COPYRIGHT + +Copyright (C) 2001 Ken'ichi Fukamachi + +All rights reserved. This program is free software; you can +redistribute it and/or modify it under the same terms as Perl itself. + +=head1 HISTORY + +IO::Adapter::File appeared in fml5 mailing list driver package. +See C<http://www.fml.org/> for more details. + +=cut + +1; 1; |
