January 2013 - dancer-users - lists.preshweb.co.uk

Server-Sent Events
by Daniel M. 16 Jan '13

16 Jan '13

Has anyone implemented the following php script in dancer: http://yuilibrary.com/gallery/show/eventsource What I wrote so far is: any ['get', 'post'] => '/chat/:session' => sub { if ( param('view') ){ template 'view', { id => param('session') }, { layout => undef }; }else{ content_type "text/event-stream"; # check every so often to see if there's new data while( 1 ) { # sleep for a second - simulate waiting for data sleep(1); # check for poll-only header if ( my $header = header("X-YUIEventSource-PollOnly") ){ # if it's a poll-only request, break the loop, which ends the request - the client will reconnect last; } return 'data: ' . request->uri_base . request->path . '?view=1'; # Of course it will also end here, the loop does not continue } return 'data: ' . request->uri_base . request->path . '?view=1'; } }; I am still getting some errors in the : src.on("error", function(event){ console.log("Error!"); });

1 0

Coming soon: Dancer::SessionFactory::Cookie
by David Golden 14 Jan '13

14 Jan '13

FWIW, once someone ships a new Dancer 2 dev release with the recent session changes that were merged, I have the next generation of cookie-based sessions ready to go. https://github.com/dagolden/dancer-sessionfactory-cookie It's even more secure than Dancer::Session::Cookie was. David -- David Golden <xdg(a)xdg.me> Take back your inbox! → http://www.bunchmail.com/ Twitter/IRC: @xdg

3 2

Plugin::Auth::Extensible quick patch for logout page
by Rick Bragg 11 Jan '13

11 Jan '13

Hi, May I offer a quick fix for the "any ['get','post'] => $logoutpage => sub" in Plugin::Auth::Extensible? ---- #add a setting for logout redirect page my $logoutredirectpage = $settings->{logout_redirect_page} || '/login'; any ['get','post'] => $logoutpage => sub { session->destroy; redirect params->{return_url} || $logoutredirectpage; }; ---- Just a quick way for when the logout page is hit with a get, it can go somewhere... Thanks! Rick Bragg

1 0

My collected fixes for sessions
by David Golden 05 Jan '13

05 Jan '13

Pull request here for anyone who wishes to review it: https://github.com/PerlDancer/Dancer2/pull/150 David -- David Golden <xdg(a)xdg.me> Take back your inbox! → http://www.bunchmail.com/ Twitter/IRC: @xdg

1 0

How to use SimpleCRUD together with Auth::*?
by chenlin rao 05 Jan '13

05 Jan '13

SimpleCRUD is a good idea. But when I use it to admin my database, I may apply an auth to the routes,how to do this? BTW: I found that SimpleCRUD given an error delete route which omit $args{dancer_prefix}?

3 3

Sessions in D2 (was Before Hook hit multiple times).
by David Golden 04 Jan '13

04 Jan '13

On Thu, Jan 3, 2013 at 11:19 AM, Alexis Sukrieh <sukria(a)sukria.net> wrote: > > I don't get it. Do you have something that works (or is supported) in Dancer > 1 regarding session that is not in Dancer 2? If so, please enlight that, and > I'd be very happy to fix it. Look at the configuration values of Dancer::Session::Abstract. Are all supported in D2? Hint: ack for "session_name" in the D2 source tree, then ack for "dancer\.session". Sessions happened to be the very first thing I was curious about in D2, given bugs I was finding in D1. Then I looked and found a big oversight like session configuration apparently unimplemented. If I find that in the first place I look, should I expect similar oversights elsewhere? Do I need to grok the entire architecture and do a code review to be sure? Maybe I was (un)lucky and found the one place that still has issues, but it's that kind of thing that makes me uncomfortable switching. Did I do a code review of D1? No. But then I expect that a large number of people using it for a few years have found the issues already. (Part of why I came to use Dancer is that it has already been well-established.) On the surface, D2 looks like D1, but it's such a re-write that I don't want to be a super-early-adopter and certainly not until the unimplemented sections I did find are fixed. David -- David Golden <xdg(a)xdg.me> Take back your inbox! → http://www.bunchmail.com/ Twitter/IRC: @xdg

2 6

Proposal: rename Dancer::Session::* to Dancer::SessionFactory::*
by David Golden 04 Jan '13

04 Jan '13

On reflection, I think that it would be wise to rename session factory modules away from "Dancer::Session::*". E.g. Dancer::SessionFactory::YAML instead of Dancer::Session::YAML Sessions work so differently on D2, that existing Dancer::Session plugins are effectively going to be re-written. Managing Dancer::Session::* plugins outside of the core in a way that works with both D1 and D2 is going to be a PITA. If instead, Dancer::Session::* are D1 session plugins and Dancer::SessionFactory::* are D2 session plugins, then things will be quite a bit easier. Existing D1 plugins can stagnate and new D2 plugins can be created. Users migrating from D1 to D2 just need to install the corresponding Dancer::SessionFactory::* (and update their config for the new config structure for sessions), and everything should work fine. David -- David Golden <xdg(a)xdg.me> Take back your inbox! → http://www.bunchmail.com/ Twitter/IRC: @xdg

1 1

Before Hook hit multiple times.
by Rick Bragg 04 Jan '13

04 Jan '13

Hi, I put a simple test in my before hook: hook 'before' => sub { debug "Before Hook"; }; and a couple of quick routes: #Home Page get '/' => sub { template 'index'; }; #About Us page get '/about-us' => sub { template 'about-us'; }; (I am also using Auth::Extensible) Whenever I hit the home page, I get 3 debug messages in a row in the log. Whenever I hit the about-up page, I get 2 debug messages in a row in the log. I thought that any kind of page hook would only be called once. Does anybody know why the before hook would ever be called more than once? Rick

11 27

dancer template_toolkit eval_perl config option???
by Matthew Polly 03 Jan '13

03 Jan '13

Happy New Year Dancers, Disregarding whether it is a good idea or not , is there a way to set eval_perl => 1 in Template Toolkit for Dancer? It didn't seem to work in the app config.yml file, which I tried like so: template: template_toolkitengines: template_toolkit: start_tag: '[%' stop_tag: '%]' eval_perl: 1 Even better would be a way to enable it for just one template. For example, would something likemy $template = Template->new( START_TAG => '[%', STOP_TAG => '%]', EVAL_PERL => 1 );fit in a route? How would $template work with respect to the normal 'template' keyword?Thanks for any help!Matt

1 0

Outputting binary data
by Rik Brown 02 Jan '13

02 Jan '13

Hi all, If I've got a scalar $data containing some binary data (a JPG image read using read_file($file, binmode => ':raw' ), how can I cause one of my routes to output it? I've done essentially this (simplified): get '/some/route' => sub { my $data = …get_image…; header 'Content-Type' => 'image/jpeg'; return $data; } but this doesn't feel right and causes a broken output (appears to return only a few rows of pixels of the image). Any tips? Cheers -- Rik Brown http://www.rikbrown.co.uk

2 2