April 2011 - dancer-users - lists.preshweb.co.uk

One-off subroutines in Dancer
by J. Bobby Lopez 07 Apr '11

07 Apr '11

I've experienced some oddities using Dancer, and it's likely due to my being a n00b. Just a quick query on whether I should be able to do something like the following without any problems: ====================== use Dancer; get '/' => sub { my $hello = test_sub("Hello World!"); return $hello; }; start; sub test_sub { my $data = shift; return $data; } ====================== If not, what would be the correct way to do the above? Thanks, -Bobby

2 2

JSON RPC Client
by J. Bobby Lopez 07 Apr '11

07 Apr '11

Hello, I'm new to dancer, and I'm trying to figure out if Dancer has a built in way of pulling in JSON data from one of it's own routes, or if a module like JSON::RPC::Client is required. I see that Alex Knowles is using that module in his moonfruit.com site, and I'm just curious if that's the "Dancer" way to do it, or if it was Alex's personal preference. Reference: http://blogs.perl.org/users/alex_knowles/2011/03/yet-another-dancer-site.ht… Thanks, -Bobby

2 1

[RFC] Change in prefix / before functionality
by Simon Wistow 01 Apr '11

01 Apr '11

I'd really like to be able to do something like this --- >8 --- package MyApp; use MyApp::Secret; prefix 'undef'; before sub { # do something }; package MyApp::Secret; prefix '/secret'; before sub { return unless auth && auth->is_admin; } 1; --- >8 --- Rather than having to have the before sub in the main MyApp do all my auth work (or conditionally load resources or whatever). However at the moment *all* before subs get run no matter what the route is - if I put some warns in the before subs for MyApp and MyApp::Secret I get [78776] core @0.000241> request: GET / from 127.0.0.1 in /Library/Perl/5.10.0/Dancer/Handler.pm l. 51 In the before for MyApp::Secret at lib/MyApp/Secret.pm line 8, <DATA> line 16. In the before for MyApp at lib/MyApp.pm line 9, <DATA> line 16. [78776] core @0.000302> request: GET /secret from 127.0.0.1 in /Library/Perl/5.10.0/Dancer/Handler.pm l. 51 In the before for MyApp::Secret at lib/MyApp/Secret.pm line 8, <DATA> line 16. In the before for MyApp at lib/MyApp.pm line 9, <DATA> line 16. Perhaps a new method called before_prefix (and before_template_prefix) or something to maintain backwards compatibility?

4 5