May 2015 - dancer-users - lists.preshweb.co.uk

Can I convert App::Notifier::Service from Dancer 1 to Dancer2?
by Shlomi Fish 07 Aug '15

07 Aug '15

Hi all, Is there a good reason why I should *not* convert https://metacpan.org/pod/App::Notifier::Service from Dancer 1 to Dancer2? It's a simple web app, meant to run synchronously, and I can debug it by using perl -d, and last time I tried doing s/Dancer/Dancer2/g everything worked nicely. Is there a good enough reason to stay with Dancer 1? Regards, Shlomi Fish -- ----------------------------------------------------------------- Shlomi Fish http://www.shlomifish.org/ http://www.shlomifish.org/humour/bits/Can-I-SCO-Now/ - "Can I SCO Now?" If it isn’t in my email, it doesn’t exist. And if the whole world says one thing and my email says something different, email will conquer. — an Israeli Linuxer. Please reply to list if it's a mailing list post - http://shlom.in/reply .

6 7

Question about the Dancer2 tutorial under Windows/Apache as an app...
by Prairie Nyx 31 May '15

31 May '15

Perl Dancer Community: I am converting from Dancer to Dancer2 (better late than never) and also developing some preliminary curriculum materials for CoderDojo using Perl Dancer2 as a framework for web development. I started with SawyerX's tutorial page: http://search.cpan.org/~xsawyerx/Dancer2/lib/Dancer2/Tutorial.pod The "dancr.pl" tutorial program ran just fine under the port 3000 server and the tutorial was useful and instructive: C:\Users\CoderDojo\Perl\Dancer\dancr>perl dancr.pl >> Dancer2 v0.160001 server 2496 listening on http://0.0.0.0:3000 I ran into an issue when I tried to convert this demo into an app that would run under Apache in a Windows environment, however. The *crux* of the issue is that the "$flash message" does not work in the app (I suspect because the global variable $flash and the two subroutines are not part of a route, but I could *really* use an explanation, if this issue is obvious to someone: I created the app as normal: C:\Apache24\htdocs>*dancer2 -a dancr* + dancr + dancr\config.yml + dancr\cpanfile + dancr\Makefile.PL + dancr\MANIFEST.SKIP + dancr\bin + dancr\bin\app.psgi + dancr\environments + dancr\environments\development.yml + dancr\environments\production.yml + dancr\lib + dancr\lib\dancr.pm + dancr\public + dancr\public\dispatch.cgi + dancr\public\dispatch.fcgi + dancr\public\404.html + dancr\public\500.html + dancr\public\favicon.ico + dancr\public\css + dancr\public\css\error.css + dancr\public\css\style.css + dancr\public\images + dancr\public\images\perldancer-bg.jpg + dancr\public\images\perldancer.jpg + dancr\public\javascripts + dancr\public\javascripts\jquery.js + dancr\t + dancr\t\001_base.t + dancr\t\002_index_route.t + dancr\views + dancr\views\index.tt + dancr\views\layouts + dancr\views\layouts\main.tt With the resulting app files, I added the code from the original "dancr.pl" demo to the applications "dancr.pm" module: package dancr; use Dancer2; our $VERSION = '0.1'; get '/' => sub { template 'index'; }; true; I had to make the following adjustments to the code for Windows/Apache: (1) Change the session to YAML #set 'session' => 'Simple'; set 'session' => 'YAML'; (2) Adjust the path for request->base: # $tokens->{'css_url'} = request->base . 'css/dancr.css'; $tokens->{'css_url'} = request->base . '/css/dancr.css'; Everything with the app works as expected *except* for the "$flash message" code: my $flash; sub set_flash($message) { my $message = shift; $flash = $message; } sub get_flash { my $message = $flash; $flash = ''; return $message; } I suspect that since these subs are outside a route, perhaps I'm getting an effect about the scope of the variables... but calls to these subroutines do *not* set $flash or $message as expected: template 'show_entries.tt', { 'msg' => get_flash, set_flash('New entry posted!'); set_flash('You are logged in.'); set_flash('You are logged out.'); For each of these, the $flash variable (which is a free-standing global in the module) is never set... and so the get_flash sub never returns a value. -- Prairie Nyx prairienyx(a)gmail.com

2 4

My Second [or so] Dancer Project: a Server for AJAX Requests for Testing JS Code
by Shlomi Fish 30 May '15

30 May '15

Hi all, I hereby would like to announce the successful completion of my second (or so) Dancer project: https://bitbucket.org/shlomif/fc-solve/src/f1b428dec2cdecd547264a79cd4c2db8… (Short URL - http://is.gd/URhahd ). What it does is provide a server for AJAX requests of command lines whose functionality was duplicated in JavaScript code and which I wanted to test that it yielded identical results to the original code. The AJAX requests were consumed by jQuery and compared against the results from the JS code. Here is the test case that uses that: https://bitbucket.org/shlomif/fc-solve/src/f1b428dec2cdecd547264a79cd4c2db8… (short URL - http://is.gd/Uj3JTR ). I originally wanted to use Dancer2, but then realised that https://metacpan.org/pod/Dancer2::Plugin::REST became broken recently (or at least failed its tests), so I opted for using Dancer1 instead whose Dancer::Plugin::REST is working fine. After that, a Dancer developer told me that he feels that Dancer2::Plugin::REST does not give too much, and that I could have avoided it. Oh well. Regards, Shlomi Fish -- ----------------------------------------------------------------- Shlomi Fish http://www.shlomifish.org/ Optimising Code for Speed - http://shlom.in/optimise If a tree falls down in the middle of the forest, and there’s no one there to hear it… what colour is the tree? — Monkey Island 2: LeChuck’s Revenge Please reply to list if it's a mailing list post - http://shlom.in/reply .

1 0

Usage Of Plugins Out Of CPAN
by Kadir Beyazlı 28 May '15

28 May '15

Hi, I understood how to use plugins which are already installed to CPAN. I install it and use. But how will I test my own plugins I wrote at local? For example, I want to test following code taken from dancer manual (https://metacpan.org/pod/Dancer2::Manual) # Start of plugin package Dancer2::Plugin::OnTuesday; # ABSTRACT: Make sure a route only works on Tuesday use Dancer2::Plugin; register on_tuesday => sub { my ( $dsl, $route_sub, @args ) = plugin_args(@_); my $day = (localtime)[6]; $day == 2 or return pass; return $route_sub->( $dsl, @args ); }; register_plugin; # End of plugin To be able to use above plugin at my local, I created .pm file at following folder: MyApp/lib/Dancer2/Plugin/OnTuesday.pm I wrote following code at folder MyApp/test.pl # Start of script use Dancer2; use lib "lib"; use Dancer2::Plugin::OnTuesday; get '/' => on_tuesday => sub { return "tuesday" }; # every other day get '/' => sub { return "other day" }; start; # End of script When I rub test.pl I got following error: Can't locate Dancer2/Plugin/OnTuesday.pm in @INC Kadir Beyazlı Computer Engineer GSM : +90 535 821 50 00

3 7

Dancer1 v1.3136 on its way to CPAN
by Yanick Champoux 24 May '15

24 May '15

Hey all, A new version of D1 is on its way to CPAN. The changelog is copied below for your enjoyment. The big thing in this release is a patch to the session handling that makes Dancer only query the backend for the session data once per request, which should makes things much better for some session engines. 1.3136 2015-05-24 [DOCUMENTATION] - Remove mention of format 'with_id' from Dancer::Logger::Abstract. (GH#112, Fabrice Gabolde) [ENHANCEMENTS] - Cache sessions such that they are only retrieved once per request. (GH#1105, GH#992, Yanick Champoux) [STATISTICS] - code churn: 7 files changed, 119 insertions(+), 16 deletions(-) Enjoy! `/anick

1 0

Re: [dancer-users] Main Layout Loading
by Andrew Beverley 21 May '15

21 May '15

On Thu, 2015-05-21 at 13:04 +0300, Kadir Beyazlı wrote: > main.tt is loaded if I use a template at my code. > What is the reason main.tt is not loaded if I don't use a template? The idea is that you can have full control as to what you return to the browser. For example, you might want to return only some simple plain text, or maybe send a file to the browser, in which case wrapping in the main layout would break things. If you use the "template" keyword, then the chances are you're displaying a standard web page, in which case it will be helpfully be wrapped in your main template, as that's probably what you would want. > For example, at following code, why main.tt is loaded at login page (get > '/login') but not loaded at Home Page (get '/' )? > > get '/' => sub { return "Home Page"; }; Here you're returning only the content "home page". If you want the text to be wrapped in the layout, then you will need to put it in a template and use the template keyword. The short of it is that whatever you return from your route is what gets sent to the browser. The layout is just a part of the template functionality which you can use to return web pages. Andy

3 2

Session management
by Zahir Lalani 21 May '15

21 May '15

Hi I am wondering if anyone has a specific pattern they use for session data. The issue we are already having is that developers are adding session data in the controller layer, but since we have some 20 controllers, session data is managed across these modules. However, the question now comes as to how we now what our session store looks like overall – the danger being one developer will create a duplicate store in the session. I thought of creating a Moo object which is then self-documenting, and would push this into the session but realised you are then pushing a large block of data each time rather than just the few values a particular module needs. How are others dealing with documenting the data in a session? Z

1 0

Main Layout Loading
by Kadir Beyazlı 21 May '15

21 May '15

Hi All, My question may be simple so sorry for it from the beginning. I set layout 'main' at config.yml file as follow: *layout: "main"* main.tt is loaded if I use a template at my code. What is the reason main.tt is not loaded if I don't use a template? For example, at following code, why main.tt is loaded at login page *(get '/login') * but not loaded at *Home Page (**get '/' )*? *get '/' => sub { return "Home Page"; }; get '/login' => sub { # Display a login page; the original URL they requested is available as # param('requested_path'), so could be put in a hidden field in the formtemplate 'login', { path => param('requested_path') };};* I could not find a logic explanation for it. -- *Kadir BeyazlıComputer Engineer* *GSM : +90 535 821 50 00*

1 0

dancer2 404 not working?
by Andrew Solomon 18 May '15

18 May '15

Hello Dancer2 experts Following these instructions https://metacpan.org/pod/distribution/Dancer2/script/dancer2 I've just run dancer2 gen -a MyWeb::App and it works as expected but or both Dancer2 v0.159003 and v0.160001 calling a non-existent url on the server does not access the 404.html page - instead it prints out something like Error 404 - Not Found /sdfsdf Powered by Dancer2 <http://perldancer.org/> 0.160001 I can confirm that it worked correctly with v0.09. Is this a known issue or should I raise a ticket? Andrew

1 0

Trouble with DBIC in Plugins
by Matthew Mallard 04 May '15

04 May '15

Hi, I’m getting a bit confused with plugins. I’m sure that I was able to use the DBIC Plugin at one point from one of my plugins, but I can’t seem to get it to work in 0.159002 or 0.160000. DBIC seems to be okay outside of plugins. 3 questions: * why does it complain about "Plugin calls 'dsl' instead of '$dsl->dsl’" when I appear to be using '$dsl->dsl’? * how do I get DBIC to print the SQL it’s executing so I can double check it’s what I’m expecting? * am I doing something else wrong in the way I’m trying to use DBIC? Basically this is the code in my plugin: register get_topics => sub { my $dsl = shift; my $type = shift; my $application = shift; my $pageid = shift; my $dberr = 0; my $current; my $urlref; my $template = ""; my $id; my @topics; $dsl->debug( "**** Here 1 ****"); eval { @topics = $dsl->schema->resultset('ContentType')->search({ application => $application }, { prefetch => [ 'content_type_names' ], order_by => 'sort_order' }) }; $dberr += $dsl->check_db_result( $dsl, $@, __LINE__ ); $dsl->debug( "**** Here 2 **** " . @topics); etc, etc } The output in the console is this: [Routes:37674] core @2015-04-27 21:57:16> Entering hook core.app.before_request in (eval 87) l. 1 [Routes:37674] debug @2015-04-27 21:57:16> **** Here 1 **** in /code/Dancer/MediBase/bin/../lib/QTechLib/Plugin.pm l. 31 DEPRECATED: QTechLib::Plugin calls 'dsl' instead of '$dsl->dsl'. at /perf/perl/lib/perl5/Dancer2/Plugin/DBIC.pm line 13. [Routes:37674] debug @2015-04-27 21:57:16> ######Dancer2::Core::DSL__WITH__Dancer2::Plugin::DBIC__WITH__Dancer2::Plugin::Ajax__WITH__QTechLib::L12N::Plugin__WITH__QTechLib::Plugin=HASH(0x3a05a88)###### at line: in /code/Dancer/MediBase/bin/../lib/QTechLib/Plugin.pm l. 66 [Routes:37674] debug @2015-04-27 21:57:16> **** Here 2 **** in /code/Dancer/MediBase/bin/../lib/QTechLib/Plugin.pm l. 31 Here 2 should print the number of topics - which should be greater than zero. with thanks, Matt

4 6