i’m a lumberjaph

This morning I saw this post from marcus ramberg about 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.

You use it like this:

perl bin/catalyst_graph_dispatcher.pl --appname Arkham --output routes.png

You can create a simple script to output as text if you prefer:

#!/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;

The code is on github 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.

Tags: catalyst, perl, visualization

This entry was posted on Saturday, May 30th, 2009 at 11:01 am and is filed under ironman. You can follow any responses to this entry through the RSS 2.0 feed. You can skip to the end and leave a response. Pinging is currently not allowed.