/usr/bin/dbic_form_generator is in libhtml-formhandler-model-dbic-perl 0.29-1.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 | #!/usr/bin/perl
eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
if 0; # not running under some shell
package form_generator;
# ABSTRACT: form generator
use strict;
use warnings;
use HTML::FormHandler::Generator::DBIC;
use lib ('lib');
my $generator = HTML::FormHandler::Generator::DBIC::Cmd->new_with_options();
print $generator->generate_form;
__END__
=pod
=encoding UTF-8
=head1 NAME
dbic_form_generator - Generate HTML form from DB schema with DBIC
=head1 DESCRIPTION
Using the database passed in the command option, dbic_form_generator
will query the DB for a schema and generate a HTML form to update the
content of the DB.
Options:
rs_name -- Resultset Name
schema_name -- Schema Name
db_dsn -- dsn connect info
class_prefix -- [OPTIONAL] Prefix for generated classes (Default: '')
label -- [OPTIONAL] Flag to toggle generation of form labels (Default: 0)
label_column -- [OPTIONAL] Flag to toggle generation of dummy form labels_columns for type: 'select' (Default: 0)
This package should be considered still experimental since the output,
of the generated classes will be changed from time to time. This should
not impact the main usage for this module that we had in mind, that is
generating the initial version of a FormHandler form class, copying
it to the project and modifying it.
This script is installed into the system with the rest of FormHandler.
=head1 VERSION
version 0.29
=head1 AUTHOR
FormHandler Contributors - see HTML::FormHandler
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2013 by Gerda Shank.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut
|