/ 
Class-PObject-2.00_01
River stage zero No dependents
/ Class::PObject::Driver::csv

NAME

Class::PObject::Driver::csv - CSV Pobject Driver

SYNOPSIS

use Class::PObject;
pobject Person => {
    columns => ['id', 'name', 'email'],
    driver  => 'csv',
    datasource => {
        Dir => 'data/',
        Table => 'person'
    }
};

DESCRIPTION

Class::PObject::Driver::csv is a direct subclass of Class::PObjecet::Driver::DBI. It inherits all the base functionality needed for all the DBI-related classes. For details of these methods and their specifications refer to Class::PObject::Driver and Class::PObject::Driver::DBI.

DATASOURCE

datasource attribute should be in the form of a hashref. The following keys are supported

  • Dir - points to the directory where the CSV files are stored. If this is missing will default to your system's temporary folder.

  • Table - defines the name of the table that objects will be stored in. If this is missing will default to the name of the object, non-alphanumeric characters replaced with underscore (_).

METHODS

Class::PObject::Driver::csv (re-)defines following methods of its own

  • dbh() base DBI method is overridden with the version that creates a DBI handle through DBD::CSV.

  • save() either builds a SELECT SQL statement by calling base _prepare_select() if the object id is missing, or builds an UPDATE SQL statement by calling base _prepare_update().

    If the ID is missing, calls generate_id() method, which returns a unique ID for the object.

  • generate_id($self, $pobject_name, \%properties) returns a unique ID for new objects. This determines the new ID by performing a SELECT id FROM $table ORDER BY id DESC LIMIT 1 SQL statement to determine the latest inserted ID.

  • _tablename($self, $pobject_name, \%properties)

    Redefines base method _tablename(). If the table is missing, it will also create the table for you.

SEE ALSO

Class::PObject, Class::PObject::Driver::mysql, Class::PObject::Driver::file

AUTHOR

Sherzod Ruzmetov <sherzodr@cpan.org>

COPYRIGHT AND LICENSE

Copyright 2003 by Sherzod B. Ruzmetov.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.