AHA!
Thanks Dotan, that clears the "check" error, but i'm still getting the
"secrete not found in Mojo::etc " error.
On Sunday, August 3, 2014 12:12:37 AM UTC-7, Dotan Dimet wrote:
>
> Shoudn't that be MyUsers->new ? You've got MyUsers=>new
> Replace => with -> and you'll hopefully have a MyUsers object.
>
> On 08/03/2014 03:15 AM, Ray Sleeper wrote:
>
> Here is the full code:
>
> #!/usr/bin/env perl
>
> use Mojolicious::Lite;
> use lib 'lib';
> use MyUsers;
>
> app->secrets(['Mojolicious rocks']);
>
> # Helper to lazy initialize and store our model object
>
> helper users => sub { state $users = MyUsers=>new };
>
> any '/' => sub {
> my $c = shift;
> # Querry parameters
> my $user = $c->param('user') || '';
> my $pass = $c->param('pass') || '';
>
> # check password
> return $c->render unless $c->users->check($user, $pass);
>
> # Store username in session
> $c->session(user => $user);
> $c->flash(message => 'Thanks for logging in.');
> # redirect to protected page with 302 respons
> $c->redirect_to('protected');
> } => 'index';
>
> group {
> under sub {
> my $c = shift;
> # redirect to main with 302 response if not logged in
> return 1 if $c->session('user');
> $c->redirect_to('index');
> return undef;
> };
>
> #protected page
> get '/protected';
> };
>
> #Logout
> get '/logout' => sub {
> my $c = shift;
> $c->session(expires => 1);
>
> #redirect to main with 302
> $c->redirect_to('index');
> };
>
> app->start;
>
> __DATA__
>
> @@ index.html.ep
> % layout 'default';
> %= form_for index => begin
> % if (param 'user' ) {
> <b>Wrong name or password, plea try againm.</b><b>
> % }
>
> Name:<br>
>
> %= text_field 'user'
> <br>Password:<br>
>
> %= submit_button 'Login'
> % end
>
> @@ protected.html.ep
> % layout 'default';
> % if (my $msg = flash 'message' ) {
> <b><%= $msg %></b><br>
> % }
>
> Welcome <%= session 'user' %>.<br>
>
> %= link_to Logout => 'logout'
>
> @@ layouts/default.html.ep
>
> <!DOCTYPE html>
>
> <html>
> <head><title>Login Manager</title></head>
>
> <body><%= content %></body>
> </html>
>
>
>
>
>
>
>
>
>
>
>
>
> On Saturday, August 2, 2014 5:09:22 PM UTC-7, sri wrote:
>>
>> Thanks for the insight, that was really helpful.
>>>
>>
>> Please be nice, passive-aggressive beheavior is not welcome here.
>>
>> --
>> sebastian
>>
> --
> You received this message because you are subscribed to the Google Groups
> "Mojolicious" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to [email protected] <javascript:>.
> To post to this group, send email to [email protected]
> <javascript:>.
> Visit this group at http://groups.google.com/group/mojolicious.
> For more options, visit https://groups.google.com/d/optout.
>
>
>
> --
> This message has been scanned for viruses and
> dangerous content by *MailScanner* <http://www.mailscanner.info/>, and is
> believed to be clean.
>
--
You received this message because you are subscribed to the Google Groups
"Mojolicious" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To post to this group, send email to [email protected].
Visit this group at http://groups.google.com/group/mojolicious.
For more options, visit https://groups.google.com/d/optout.
