Perl x Open Food Facts Hackathon: Paris, France - May 24-25 Learn more

#!/usr/bin/env perl
use strict;
our $VERSION = 0.05;
# Run.
exit App::Schema::Data->new->run;
# Print version.
sub VERSION_MESSAGE {
print $VERSION."\n";
exit 0;
}
__END__
=pod
=encoding utf8
=head1 NAME
schema-data - Script to manipulation with data for Schema.
=head1 SYNOPSIS
schema-data [-h] [-l plugin:...] [-p password] [-u user] [-v schema_version] [--version] dsn schema_data_module var_key=var_value ..
=head1 ARGUMENTS
=over 8
=item * C<-h>
Print help.
=item * C<-l plugin:...>
List of plugins to load separated by ':' character.
Each plugin must be in Schema module namespace like C<__SCHEMA_MODULE_NS__::Plugin::__PLUGIN__>.
And must inherit L<Schema::Data::Plugin>.
=item * C<-p password>
Database password.
=item * C<-u user>
Database user.
=item * C<-v schema_version>
Schema version.
Default value is last version.
=item * C<--version>
Print version of script.
=item * C<dsn>
Database DSN.
e.g. dbi:SQLite:dbname=ex1.db
=item * C<schema_data_module>
Name of Schema data module. Must be a 'Schema::Data' instance.
=item * C<var_key=var_value>
Variable keys with values for insert.
=back
=head1 EXAMPLE
schema-deploy dbi:SQLite:dbname=commons.vote.db Schema::Commons::Vote
schema-data -l DefaultTheme dbi:SQLite:dbname=commons.vote.db Schema::Data::Commons::Vote 'creator_name=Michal Josef Špaček' creator_email=michal.josef.spacek@wikimedia.cz
=head1 REPOSITORY
=head1 AUTHOR
Michal Josef Špaček L<mailto:skim@cpan.org>
=head1 LICENSE AND COPYRIGHT
© 2022 Michal Josef Špaček
BSD 2-Clause License
=head1 VERSION
0.05
=cut