http://blog.gmane.org/gmane.comp.web.catalyst.general hourly 1 1901-01-01T00:00+00:00 http://gmane.org/img/gmane-25t.png http://gmane.org http://comments.gmane.org/gmane.comp.web.catalyst.general/28091 <pre>Hi all, I would like to mix in the same action some custom ActionRoles (via Catalyst::Controller::ActionRole) and Catalyst::Action::REST. I gave it a try in a test application, but the action roles are getting applied to both the main action and the method-specific action: # Main action sub index :Path :Args(0) :Does('Role1') :Does('Role2') :ActionClass('REST') { ... } # GET specific action sub index_GET { ... } In this scenario, I'm getting Role1 and Role2 functions executed twice, which is not desired. I wonder if someone out there is using it (or another approach which provides the same features), and if there is a sane way to mix both functionalities without shoot myself in the foot Maybe would be interesting to have a Catalyst::ActionRole::REST, providing the same features than Catalyst::Action::REST, but encapsulated in a role? If I'm saying something silly, or if I'm missing some point which makes this impossible, please let me know. Thanks in advance for your comments! </pre> Miquel Ruiz 2012-05-26T16:34:03 http://comments.gmane.org/gmane.comp.web.catalyst.general/28088 <pre>Hello, Is it possible to set the auth headers with the Plack stuff w/o having to do the base64 and set headers manually? I.e. something like with mech: $mech-&gt;credentials( $username, $password ); But using the Catalyst::Test way... Thanks! </pre> Alejandro Imass 2012-05-24T17:53:08 http://comments.gmane.org/gmane.comp.web.catalyst.general/28082 <pre>Short version: How can we toggle field "X" from being a Select (popup) for Admin users, to being a Hidden (nothing visible, but the value is maintained) for Manager users? Long version: We have three levels of user-roles (*admins* can do everything, *managers*can do a lot, *readonly* can do very little). Admins get to specify user roles for all users (even other admins), but managers (level two) only get to edit readonly users and we don't want them to elevate any such users to being managers (or worse, admins). package MyApp::Controller::Admin::Person; #... $self-&gt;form( MyApp::Form::Admin::Person-&gt;new( ctx =&gt; $c ) ); package MyApp::Form::Admin::Person; #.... sub set_active { my $self = shift; $self-&gt;inactive(['role']) unless $self-&gt;ctx-&gt;user-&gt;is_admin; } Trying to use ctx so we could pass $c and later test it in the form's "set_active" method throws an exception because of ctx being undefined. package MyApp::Controller::Admin::Person; #..</pre> will trillich 2012-05-24T04:24:43 http://comments.gmane.org/gmane.comp.web.catalyst.general/28076 <pre>I am having difficulty in getting my user to authenticate against the second realm. After successfully authenticating against the ldap server, I want to authenticate against the dbic realm as well as that is where the roles are stored. It seems to ignore a second call to $c-.authenticate. I tried removing the "default_realm =&gt; 'ldap'" entry but it complained with an error of not find the user in the realm "default". I looked at the "Progressive" module, but it seems to me that it stops as soon as the user authenticates. I also have had no luck doing a find_or_create. Do I need to consolidate the roles into the users table? I even tried just creating a user in the user table figuring I could do a second step of updateing the users_to_roles table after that. I keep getting "me.user is not valid in the context it is being used" Once again I can find no help in the docs. They simply do not address this situation. I have found that other people have solved this, but they don't seem to post the co</pre> Kenneth S Mclane 2012-05-23T15:37:43 http://comments.gmane.org/gmane.comp.web.catalyst.general/28070 <pre>Hello, how can I sort hash reference by values, I found some solution: http://mail.template-toolkit.org/pipermail/templates/2005-June/007501.html But I don't know where can I add virtual method. 3) Similar to 2. Add a virtual method to your hashes. Just add this above your process call. (Note: You might need to add: 'use Template::Stash;') : $Template::Stash::HASH_OPS-&gt;{ sort_keys_by } = sub { my ($hash, $sort_field) = &lt; at &gt;_; return sort { $hash-&gt;{$a}-&gt;{$sort_field}&lt;=&gt; $hash-&gt;{$b}-&gt;{$sort_field} } keys %$hash }; then you can do: [% FOREACH r = ref.sort_keys_by('number') %] &lt;a href="/program?id=[% r %]"&gt;[% ref.$r.title _ " " _ ref.$r.number %]&lt;/a&gt; [% END %] I try to add virtual method to View but i get error: |Couldn't render template "stats.tt: undef error - Can't use string ("1") as a HASH ref while "strict refs" in use at View/HTML.pm line 15.| _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/l</pre> Tomasz Gromowski 2012-05-23T13:53:13 http://comments.gmane.org/gmane.comp.web.catalyst.general/28067 <pre>I think that there is a problem using the Makefile.PL with Test::Prereqs and similar modules. When I run prereqs_ok(), I get the following error: _get_prereqs: Error loading Makefile.PL: Can't call method "load_all_extensions" on an undefined value at /usr/local/share/perl/5.10.1/Module/Install.pm line 206, &lt;DATA&gt; line 4267. BEGIN failed--compilation aborted at ./Makefile.PL line 4, &lt;DATA&gt; line 4267. not ok 1 - Makefile.PL did not return a true value. # # Failed test 'Makefile.PL did not return a true value. # ' # at /usr/local/share/perl/5.10.1/Test/Prereq.pm line 220. # # Looks like you failed 1 test of 1. Dubious, test returned 1 (wstat 256, 0x100) Failed 1/1 subtests _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Robert Rothenberg 2012-05-23T10:26:04 http://comments.gmane.org/gmane.comp.web.catalyst.general/28065 <pre>I have an application that uses sessions with a FastMmap store. This application also includes a custom script (using Catalyst::ScriptRole) used to perform certain administrative tasks from the command line. The problem is that Catalyst tries to unlink and recreate the session cache every time it starts (somewhere in the bowels of MyApp-&gt;setup(), I imagine). This is obviously a bad idea if the application is running, but it is a problem even if the application isn't running if the session cache is owned by a different user (e.g. www) than the one that runs the script (e.g. des). Is there a way to have C::Plugin::Session (or C::P::S::Store::FastMmap) initialize the cache on first use instead of at startup? As an alternate solution, is there a way to have it use a different file name every time it starts? DES </pre> Dag-Erling Smørgrav 2012-05-23T08:58:42 http://comments.gmane.org/gmane.comp.web.catalyst.general/28064 <pre>I have succeeded in getting my LDAP Auth working. I setup three tables in the DB I am working with for Users, Roles, and Users_to_Roles. I setup some rudimentary role checking, but the Authorization module is complaining about needing to configure rolebasedn. I can't use the LDAP server for this as I do not have any control to set roles/groups there. How do I set this to check my table? Do I need to setup a realm and point it at the tables? I'd also like to make it so when a user logs on for the first time the system will add them to the users table and assign the "user" role to them. _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Kenneth S Mclane 2012-05-22T16:50:00 http://comments.gmane.org/gmane.comp.web.catalyst.general/28043 <pre>Hi, We've got some monitoring software installed which is accessing the home page of my catalyst app every couple of seconds and flooding the sessions table. I can recognise the monitor based on the user agent, so I'd like to stop it saving the session. Something like: if ($c-&gt;request-&gt;user_agent =~ m/HTTP-Monitor/ ) { Don't save the session. } What's the best way to do this? Thanks Duncan _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Duncan Garland 2012-05-21T15:49:07 http://comments.gmane.org/gmane.comp.web.catalyst.general/28039 <pre>I am continuing on my journey to duplicate a web app for administering a db. I have all my pages up and running, as well as search functionality. I decided to attack authentication next. I am using a php pages from a different web app to get the settings for our LDAP server. //Connect to ldap server $ds=ldap_connect("xxx.xxx.xxx.xxx"); if ($ds) { //Get ID for intranet user $sr=ldap_search($ds, "ou=ldap.server, o=domain.com", "mail=$username"); $info = ldap_get_entries($ds, $sr); for ($i=0; $i&lt;$info["count"]; $i++) { $uid=$info[$i]["dn"]; } if (strpos($uid,'uid') !== false) { //Bind to ldap server with $uid and $password to verify $bind_results=ldap_bind($ds, "$uid", "$password") or die("Could not log you in please check your UserName and Password and try again."); if ( $bind_results == "1" ) $</pre> Kenneth S Mclane 2012-05-21T14:20:22 http://comments.gmane.org/gmane.comp.web.catalyst.general/28038 <pre>Hi I'm pleased to announce the latest maintenance release of Catalyst::Runtime, 5.90012. This release fixes issues with the upcoming perl 5.16.0, and has various other small fixes and documentation improvements. Full change log is below as always. Cheers t0m 5.90012 - 2012-05-16 09:59:00 Distribution META.yml changes: - author key is now correct, rather than what Module::Install mis-parses from the documentation. - x_authority key added. Bug fixes: - Fix request body parameters being multiply rebuilt. Fixes both RT#75607 and CatalystX::DebugFilter - Make plugin de-duplication work as intended originally, as whilst duplicate plugins are totally unwise, the C3 error given to the user is less than helpful. - Remove dependence on obscure behaviour in B::Hooks::EndOfScope for backward compatibility. This fixes issues with behaviour changes in bleadperl. RT#76437 - Work around Moose bug RT#7536 which breaks Catalyst::Controller::DBIC::API. Documentation: - Fi</pre> Tomas Doran 2012-05-19T07:12:29 http://comments.gmane.org/gmane.comp.web.catalyst.general/28032 <pre>Hi there, I've failed in locating this question as a FAQ, so I would appreciate some guidance. I've written a Catalyst application that will be deployed in Debian. We want to keep config files under /etc/some_app/ so naturally, I would like to add this path to the ones to be searched by ConfigLoader. The application's main .pm contains: use Catalyst ( qw/ ConfigLoader # ... / ); We'll want to run the application under nginx/FastCGI. I realize that I can simply set the environment appropriately in the startup rc script but before doing that, I was wondering what would be the "best practice" way to achieve this? Best regards. -lem _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Luis Muñoz 2012-05-16T21:45:20 http://comments.gmane.org/gmane.comp.web.catalyst.general/28024 <pre>Dear All, I'd like to offer users their own database (so that their own data is separate from other users) but use the same MVC code for all the user databases. Following some helpful advice from this forum I have found the documentation for ACCEPT_CONTEXT but unfortunately I don't have the smarts to understand the documentation, could someone please explain some things to me? Essentially I reckon I want to change the __PACKAGE__-&gt;config in my model on a per transaction basis. My current model looks like this package EasyAC::Model::DB; use strict; use base 'Catalyst::Model::DBIC::Schema'; __PACKAGE__-&gt;config( schema_class =&gt; 'EasyAC::Schema', connect_info =&gt; { dsn =&gt; 'dbi:mysql:easyac01', user =&gt; 'me', password =&gt; 'mypass', AutoCommit =&gt; q{1}, } ); The ACCEPT_CONTEXT documentation suggests: Add a field to $c, like my_model_instance. Then write your ACCEPT_CONTEXT method to look like this: sub ACCEPT_CONTEXT { my ( $self, $c )</pre> scott< at >simpzoid.com 2012-05-15T19:11:29 http://comments.gmane.org/gmane.comp.web.catalyst.general/28019 <pre>Is anyone creating an RPM out of their Perlbrew install? I'm looking for pointers and examples. At work we currently build separate RPMs for all our in-house dependencies and the catalyst apps (as well as for any CPAN distributions that existing RPMs don't exist or are ouf date). It's a pretty time-consuming and tedious process -- or at least has turned out that way in practice. In contrast, (assuming we have our in-house distributions in a private/local CPAN), it's pretty painless to install Perl with Perlbrew and use "cpan" to install the app and all dependences and run the app from this local installation. My question is about bundling up this as one big fat (1/2GB) RPM. Anyone doing this, and if so, can you share the spec file you use? The other issues I'd like to ask about are pushing out crontabs at the right time (with the app because the cron might depend on the app's version), and the startup script, although upstart was discussed recently in another thread. Thanks, </pre> Bill Moseley 2012-05-15T13:05:37 http://comments.gmane.org/gmane.comp.web.catalyst.general/28014 <pre>I am trying to add OpenID logins to my site. I've looked at several examples of this, but whenever I run if ($c-&gt;authenticate({ openid_identifier =&gt; $openid_url }, 'openid')) { ... } It redirects to the OpenID provider, and then redirects back to the login page with added URL paramaters (oic.time, openid-check, openid.assoc_handle, openid.claimed_id, openid.identity, etc.) This doesn't seem like it's doing what it's supposed to be. Any idea's what's happening? _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Robert Rothenberg 2012-05-14T15:37:03 http://comments.gmane.org/gmane.comp.web.catalyst.general/28012 <pre>I'm playing around with Vagrant[1] to manage my development VMs and I'm running into some NFS-troubles and just wanted to hear if and how you guys are developing with a guest OS. The thing is that Vagrant by default configures the VM to export a shared directory (where my Catalyst app lives) from the host OS (OS X in my case) to the guest VM (Debian). I'm using the alternative NFS mount option because VirtualBox's shared folder support is known to be super slow. Problem is, Catalyst::Restarter doesn't pick up changes to my files. I suppose this is due to NFS doing attribute caching. If I turn this off (with "noac" in the NFS mount options), the Catalyst server picks up the changes more quickly but it also takes a full minute to start (as opposed to 3-4 seconds when the files are local). Having the app locally on my host and exporting it into the VM feels more natural to me, but the performance issues really make this a deal-breaker. Does anyone have any advice on how to improve things? How do you share you</pre> Tobias Kremer 2012-05-14T11:53:12 http://comments.gmane.org/gmane.comp.web.catalyst.general/28005 <pre>We're working on an application with a lot of users, and where the passwords are encrypted (and future versions may also allow OpenID logins). Developers would like the ability for the "root" user to be able to become another user, for the purposes of debugging problems that real users might be having on a live system. How does one do this using the Authentication plugin? Obvious things to try like the $c-&gt;user($new_user) doesn't work, not does the (internal) $c-&gt;set_authenticated($user, $real) method. _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Robert Rothenberg 2012-05-11T16:45:13 http://comments.gmane.org/gmane.comp.web.catalyst.general/28001 <pre>I am trying to port this query to Catalyst: SELECT s.server_id, a.account_code, s.server_name, s.server_type, s.os_name, (select count(*) from server ss, subsystem sb where ss.server_id = sb.server_id and ss.server_id = s.server_id) as num_subsystems FROM account a, server s WHERE a.account_id = s.account_id order by a.account_code, s.server_name This is what I have so far: sub list :Local { my ($self, $c, $page) = &lt; at &gt;_; $page = $c-&gt;req-&gt;param('page') || 1; my $rs = $c-&gt;model('ORANGES::Server')-&gt;search_rs(undef, { prefetch =&gt; ['account','subs'], rows =&gt; 15, page =&gt; $page, '+select' =&gt; [{count =&gt; 'subs.subsystem.id'}], '+as' =&gt; [qw/num_subs/], order_by =&gt; ['account.account_code', 'server_name'], </pre> Kenneth S Mclane 2012-05-10T14:17:53 http://comments.gmane.org/gmane.comp.web.catalyst.general/27994 <pre>Dear All, I'd like to offer users their own database (so that their own data is separate from other users) but use the same MVC code for all the user databases. I was anticipating that I would have a database with the all the user information including the name of each user's personal database and then a single database per user. The authentication would be done against the user information database and then a connection to the individual user's database used for CRUD using DBIC. Does anyone have any hints on how to arrange the authorization and subsequent connections? I'm happy to work out the details myself but could do with a few hints to get started. Regards, Scott _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Scott Simpson 2012-05-09T20:09:53 http://comments.gmane.org/gmane.comp.web.catalyst.general/27974 <pre>I am having a problem with my code and I cannot figure out why it is doing what it is doing. I have this sub: sub list :Local { my ($self, $c, $page) = &lt; at &gt;_; $page = $c-&gt;req-&gt;param('page') || 1; my $rs = $c-&gt;model('ORANGES::Account')-&gt;search({}, { join =&gt; 'progress', '+select' =&gt; ['progress.percent_complete'], '+as' =&gt; ['progress.percent_complete'], join =&gt; 'compliance', '+select' =&gt; ['compliance.percent_compliant'], '+as' =&gt; ['compliance.percent_compliant'], join =&gt; 'department_id', '+select' =&gt; ['department_id.department_id'], '+as' =&gt; ['department_id.department_id'], join =&gt; 'metrics', '+select' =&gt; ['metrics.num_servers','metrics.num_subsystems'], '+as' =&gt; ['metrics.num_servers','metrics.num_subsystems'], order_by =&gt; 'account_code', rows =&gt; 15, </pre> Kenneth S Mclane 2012-05-08T15:13:28 http://comments.gmane.org/gmane.comp.web.catalyst.general/27963 <pre>HI everybody, As you will no doubt have noticed, the April Catalyst Monthly is late. To help rememdy this situation, I'd really appreciate your tips and tricks for using Plack and Catalyst together. I'm particularly interested in smart things that can be done to streamline development, but any suggestions/examples you have would be more than welcome (and I'll credit where it's due). Reply to the list, to me personally or grab me (kd) on #catalyst&lt; at &gt;irc.perl.org _______________________________________________ List: Catalyst&lt; at &gt;lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst&lt; at &gt;lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/ </pre> Kieren Diment 2012-05-03T23:28:37 Search the mailing list at Gmane query http://search.gmane.org/?group=$group=gmane.comp.web.catalyst.general