Select Code to Download

sub list :Local {
    # Retrieve the usual Perl OO '$self' for this object. $c is the Ca
+talyst
...
    # your controllers).
    $c->stash(template => 'main/list.tt');
}

[% cols = resultset.result_source.columns; FOREACH x IN cols; "<li>"  
+_ resultset.$x _ "</li>"; END %]

...
        </td>
    [% END %]
</table>

    $c->stash (resultset => $c->model('DB::User')->all);

    $c->stash (resultset => [$c->model('DB::User')->all]);

  # the long way
  my $rs = $c->model('FilmDB')->schema->resultset('Actor');
...

  # using the generated class directly
  my $rs = $c->model('FilmDB::Actor');

    my $dbic     = $c->model('FilmDB')->schema;
    my $dbic     = $c->model('DB::FilmDB')->schema;