I&#39;m quite positive others are working on something like this, but I&#39;d like this to serve as A) my volunteering to help with ongoing efforts and B) help get a center point from which to start.<br><br><div class="asset-body">


                                        <p>I&#39;m working on a &quot;pass through login&quot; type Role for Catalyst (I think that&#39;s what I should call it).<br><br>The idea looks like this:<br><br> </p>

<pre>package TestApp::Controller::Root;<br>use Moose;<br>use namespace::autoclean;<br>BEGIN { extends &#39;Catalyst::Controller&#39;; }<br>with &#39;CatalystX::RedirectAfterLogin&#39;;<br><br>sub login : Local {<br>    my ($self, $c) = @_;<br>

    if ( $c-&gt;req-&gt;param(&#39;username&#39;) eq &#39;blah&#39; ) {<br>        $c-&gt;next_page(&#39;success&#39;);<br>    } else {<br>        $c-&gt;res-&gt;body(&#39;Failed!&#39;);<br>        $c-&gt;detach;<br>    }<br>

}<br><br><br>sub success : Path {<br>    my ($self, $c) = @_;<br>    $c-&gt;res-&gt;body(&quot;Success!&quot;);<br><br>}<br></pre>

<p>This isn&#39;t quite working yet.  I&#39;m getting some errors with Moose that I can&#39;t figure out.  Feel free to poke: <a href="http://github.com/dhoss/CatalystX--RedirectAfterLogin/tree/master">CatalystX::RedirectAfterLogin</a></p>



                                    </div><br clear="all">Original post: <a href="http://www.codedright.net/2009/07/catalystxredirectafterlogin.html">http://www.codedright.net/2009/07/catalystxredirectafterlogin.html</a><br>

<br>-- <br>Devin Austin<br><a href="http://www.codedright.net">http://www.codedright.net</a><br><a href="http://www.dreamhost.com/r.cgi?326568/hosting.html">http://www.dreamhost.com/r.cgi?326568/hosting.html</a> - Host with DreamHost!<br>