sub list :Local {
	# Retrieve the usual Perl OO '$self' for this object. $c is the Catalyst
	# 'Context' that's used to 'glue together' the various components
	# that make up the application
	my ($self, $c) = @_;

	# Retrieve all of the book records as book model objects and store in the
	# stash where they can be accessed by the TT template
	#$c->stash(resultset => [$c->model('DB::User')->all]);
	$c->stash (resultset => $c->model('DB::User')->all);

	use Data::Dumper;
	my $aref = $c->model('User');
	$c->log->debug( Dumper $aref );

	# Set the TT template to use.  You will almost always want to do this
	# in your action methods (action methods respond to user input in
	# your controllers).
	$c->stash(template => 'main/list.tt');
}

##</code><code>##

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

[% # FOREACH row IN resultset %]Username: [% #row.username %]<br />[% #END %]

<table>
	<tr> 
		<th>User Name</th>
        <th>Password</th>
        <th>Email</th>   
        <th>FName</th>
        <th>LName</th>
		<th>Active</th>
	</tr>

	[% FOREACH row IN resultset %]
		<tr>
			<td>[% row.username %]</td>
			<td>[% row.password %]</td>
			<td>[% row.email_address %]</td>
			<td>[% row.first_name %]</td>
			<td>[% row.last_name %]</td>
			<td>[% row.active %]</td>
		</td>
	[% END %]
</table>

##</code><code>##

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

##</code><code>##

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

##</code><code>##

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

  # using the shortcut method on the model object
  my $rs = $c->model('FilmDB')->resultset('Actor');

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

##</code><code>##

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