From 0afbfaee75e8480e8e0ed0a3bbd3749a4756f727 Mon Sep 17 00:00:00 2001
From: franck cuny <franck@lumberjaph.net>
Date: Fri, 10 Sep 2010 23:25:10 +0200
Subject: initial import

---
 ...2009-05-30-catalystx-dispatcher-asgraph.textile | 29 ++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 _posts/2009-05-30-catalystx-dispatcher-asgraph.textile

(limited to '_posts/2009-05-30-catalystx-dispatcher-asgraph.textile')

diff --git a/_posts/2009-05-30-catalystx-dispatcher-asgraph.textile b/_posts/2009-05-30-catalystx-dispatcher-asgraph.textile
new file mode 100644
index 0000000..af46c6b
--- /dev/null
+++ b/_posts/2009-05-30-catalystx-dispatcher-asgraph.textile
@@ -0,0 +1,29 @@
+---
+layout: post
+title: CatalystX::Dispatcher::AsGraph
+category: perl
+---
+
+This morning I saw "this post":http://marcus.nordaaker.com/2009/05/awesome-route-graph-with-mojoxroutesasgraph/ from marcus ramberg about "MojoX::Routes::AsGraph":http://search.cpan.org/perldoc?MojoX::Routes::AsGraph. I liked the idea. But as I Catalyst instead of Mojo, I thought I could give a try and do the same thing for Catalyst dispatcher, and I've coded CatalystX::Dispatcher::AsGraph. For the moment only private actions are graphed.
+
+!/static/imgs/routes-300x249.png(routes)!
+
+You use it like this:
+
+bc. perl bin/catalyst_graph_dispatcher.pl --appname Arkham --output routes.png
+
+You can create a simple script to output as text if you prefer:
+
+{% highlight perl %}
+#!/usr/bin/perl -w
+use strict;
+use CatalystX::Dispatcher::AsGraph;
+
+my $graph = CatalystX::Dispatcher::AsGraph->new_with_options();
+$graph->run;
+print $graph->graph->as_txt;
+{% endhighlight %}
+
+The code is on "github":http://github.com/franckcuny/CatalystX--Dispatcher--AsGraph/tree/master for the moment.
+
+For thoses who are interested by visualization, I'll publish soon some (at least I think) really nice visualisations about CPAN, Perl, and his community, that we have created at "$work":http://rtgi.fr.
-- 
cgit v1.2.3

