Very basic pure html vertical bar graphing for cap:dbiprofile.
# in httpd.conf SetVar CAP_DBIPROFILE_GRAPHMODULE CGI::Application::Plugin::DBIProfile::Graph::HTML PerlSetVar CAP_DBIPROFILE_GRAPHMODULE CGI::Application::Plugin::DBIProfile::Graph::HTML
This module is provided as a basic implementation of graphing for CAP:DBIProfile. It can be used as an example to develop other, more sophisticated, graphing solutions.
The graphing plugin must have a method called \*(L"build_graph\*(R", which must accept options as a hash.
It should return a scalar or scalar ref holding the \s-1HTML\s0 output needed to generate your graph.
The following options will be passed to the \*(L"build_graph\*(R" method:
The cgiapp object.
$self->mode_param - the runmode variable used to determine runmode (useful for creating links back to ourselves).
A textual title for your graph. You don't have to use this, but is there if you want it.
Label for values we're graphing. Either \*(L"Count\*(R" or \*(L"Seconds\*(R".
An array of the datapoints to graph.
Labels for each datapoint which match the labels that will be used on the sql statement list (1 to however many items there are).
The easiest graphs to implement are fully inline - ie. it doesn't need to make any external calls (no <image> or <embed> tags and such). CGI::Application::Plugin::DBIProfile::Graph::HTML is an example of this. Other possible candidates are Plotr and Open Flash Chart (using js interface to populate data).
Another inline solution is to use the <img src=\*(L"data:uri\*(R"> scheme. An example of this can be found in CGI::Application::Plugin::DBIProfile::Graph::GDGraphInline. Please note, this isn't supported under \s-1MSIE\s0.
In order to generate a graph that isn't inline, you'll need to pass the data to be graphed with your call to the external object. For example, if you want to use GDGraph, you could create a separate cgi script that returns graphs based on params passed to it, and return an approapriate image tag to from your graphing module. For example:
<img src="/cgi-bin/graph.pl?data=20,14,42&tags=1,2,3">
Another way, would be to add a runmode in a CGI::Application \*(L"init\*(R" hook, and pass that runmode in a link back to the same script, and include your graph module in our script with a use statement. An example of this can be found in CGI::Application::Plugin::DBIProfile::Graph::SVGTT.
L<HTML::Template>
L<CGI::Application::Plugin::DBIProfile> L<CGI::Application::Plugin::DBIProfile::Graph::GDGraphInline> L<CGI::Application::Plugin::DBIProfile::Graph::SVGTT>
Joshua I Miller, L<[email protected]>
Copyright 2007 Joshua Miller, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.