DBIx::TextTableAny - Generate text table from SQL query result using Text::Table::Any
This document describes version 0.001 of DBIx::TextTableAny (from Perl distribution DBIx-TextTableAny), released on 2018-06-30.
use DBI; use DBIx::TextTableAny; my $dbh = DBI->connect("dbi:mysql:database=mydb", "someuser", "somepass");
Selecting a row:
print $dbh->selectrow_texttable("SELECT * FROM member");
Sample result (default backend is Text::Table::Tiny):
+-------+----------+----------+ | Name | Rank | Serial | +-------+----------+----------+ | alice | pvt | 123456 | | bob | cpl | 98765321 | | carol | brig gen | 8745 | +-------+----------+----------+
Selecting all rows:
Sample result:
Picking another backend (and setting other options):
use DBIx::TextTableAny backend => 'Text::Table::CSV', header_row => 1; my $sth = $dbh->prepare("SELECT * FROM member"); $sth->execute; print $sth->fetchall_texttable;
Name,Rank,Serial alice,pvt,123456 bob,cpl,98765321 carol,"brig gen",8745
This package is a thin glue between Text::Table::Any and DBI. It adds the following methods to database handle:
selectrow_texttable selectall_texttable
as well as the following methods to statement handle:
fetchrow_texttable fetchall_texttable
The methods send the result of query to Text::Table::Any and return the rendered table.
In essence, this is an easy, straightforward way produce text tables from SQL query. You can generate CSV, ASCII table, or whatever format the Text::Table::Tiny backend happens to support.
Please visit the project's homepage at https://metacpan.org/release/DBIx-TextTableAny.
Source repository is at https://github.com/perlancar/perl-DBIx-TextTableAny.
Please report any bugs or feature requests on the bugtracker website https://rt.cpan.org/Public/Dist/Display.html?Name=DBIx-TextTableAny
When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.
DBI::Format
perlancar <perlancar@cpan.org>
This software is copyright (c) 2018 by perlancar@cpan.org.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install DBIx::TextTableAny, copy and paste the appropriate command in to your terminal.
cpanm
cpanm DBIx::TextTableAny
CPAN shell
perl -MCPAN -e shell install DBIx::TextTableAny
For more information on module installation, please visit the detailed CPAN module installation guide.