DBIx::SQLCrosstab::Format is a Perl module with formats results created by DBIx::SQLCrosstab.

SYNOPSIS

use DBIx::SQLCrosstab::Format;
my $dbh=DBI->connect("dbi:driver:database"
"user","password", {RaiseError=>1})
or die "error in connection $DBI::errstrn";

my $params = {
dbh => $dbh,
op => [ [ SUM, salary] ],
from => person INNER JOIN departments USING (dept_id),
rows => [
{ col => country},
],
cols => [
{
id => dept,
value =>department,
from =>departments
},
{
id => gender, from => person
}
]
};
my $xtab = DBIx::SQLCrosstab::Format->new($params)
or die "error in creation ($DBIx::SQLCrosstab::errstr)n";

my $query = $xtab->get_query("#")
or die "error in query building $DBIx::SQLCrosstab::errstrn";

if ( $xtab->get_recs) {
# do something with records, or use a built-in function
# to produce a well formatted HTML table
#
print $xtab->as_html;

print $xtab->as_xml;
print $xtab->as_yaml;
print $xtab->as_csv(header);
$xtab->as_xls("xtab.xls");
use Data::Dumper;
print Data::Dumper->Dump ([ $xtab->as_perl_struct(hoh)],
[hoh]);
print Data::Dumper->Dump ([ $xtab->as_perl_struct(losh)],
[losh]);
print Data::Dumper->Dump ([ $xtab->as_perl_struct(loh)],
[loh]);
}
else {
die "error in execution $DBIx::SQLCrosstab::errstrn";
}

DBIx::SQLCrosstab::Format is a class descending from DBIx::SQLCrosstab. Being a child class, it inherits its parent methods and can be used in the same way.

In addition, it provides methods to produce formatted output.