From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

 / 
ODS-0.04
River stage zero No dependents
/ ODS

NAME

ODS - Object Data Store

VERSION

Version 0.04

SYNOPSIS


            

              
              
package Table::Court;
use ODS;
name "user";
options (
        custom => 1
);
column id => (
        type => "integer",
        auto_increment => true,
        mandatory => true,
        filterable => true,
        sortable => true,
        no_render => true
);
column first_name => (
        type => "string",
        mandatory => true,
        filterable => true,
        sortable => true,
);
column last_name => (
        type => "string",
        mandatory => true,
        filterable => true,
        sortable => true,
);
column diagnosis => (
        type => "string",
        mandatory => true,
        filterable => true,
        sortable => true,
);
1;
...
package ResultSet::Court;
use YAOO;
extends 'ODS::Table::ResultSet";
has people => isa(string);
has miss_diagnosis => isa(object);
sub licenced_doctors {
        my ($self, %name) = @_;
        $self->miss_diagnosis($self->find(
                %name
        ));
}
...
package Row::Court;
use YAOO;
extends 'ODS::Table::Row';
has barrister => isa(string);
...
my $data = Table::Court->connect('File::YAML', {
        file => 't/filedb/patients'
});
my $all = $data->all();
my $misdiagnosis = $data->licenced_doctors({ first_name => 'Anonymous', last_name => 'Object' });
$miss_diagnosis->update(
        diagnosis => 'psychosis'
);

AUTHOR

LNATION, <thisusedtobeanemail at gmail.com>

BUGS

Please report any bugs or feature requests to bug-ods at rt.cpan.org, or through the web interface at https://rt.cpan.org/NoAuth/ReportBug.html?Queue=ODS. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.


            

              
              
perldoc ODS

You can also look for information at:

ACKNOWLEDGEMENTS

LICENSE AND COPYRIGHT

This software is Copyright (c) 2022 by LNATION.

This is free software, licensed under:


            

              
              
The Artistic License 2.0 (GPL Compatible)