Catalyst::Manual::Tutorial::AdvancedCRUD 0.02

Catalyst::Manual::Tutorial::AdvancedCRUD is a Catalyst Tutorial - Part 8: Advanced CRUD. Add a Form Creation Helper Method Open lib/MyApp/Controller/Books.pm in your editor and add the following method: =head2 make_book_widget Build an HTML::Widget form for book creation and updates =cut sub make_book_widget { my ($self, $c) = @_; # Create an HTML::Widget to build the form my $w = $c->widget(book_form)->method(post); # Get authors my @authorObjs = $c->model("MyAppDB::Author")->all(); my @authors = map {$_->id => $_->last_name } sort {$a->last_name cmp $b->last_name} @authorObjs; # Create the form feilds $w->element(Textfield, title )->label(Title)->size(60); $w->element(Textfield, rating )->label(Rating)->size(1); $w->element(Select, authors)->label(Authors) ->options(@authors); $w->element(Submit, submit )->value(submit); # Return the widget return $w; } This method provides a central location that builds an HTML::Widget-based form with the appropriate fields. The "Get authors" code uses DBIC to retrieve a list of model objects and then uses map to create a hash where the hash keys are the database primary keys from the authors table and the associated values are the last names of the authors..

Requirements:	No special requirements
Platforms:	Linux
Keyword:	Advanced Crud,  Advancedcrud,  Authors,  Catalyst Tutorial,  Catalystmanualtutorialadvancedcrud,  Form,  Html,  Last,  Libraries,  Part,  Programming,  Tutorial,  Widget
Users rating:	0/10