The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Catalyst::Action::Serialize::SimpleExcel - Serialize tables to Excel files

VERSION

Version 0.011

SYNOPSIS

Serializes tabular data to an Excel file. Not terribly configurable, but should suffice for simple purposes.

In your REST Controller:

    package MyApp::Controller::REST;

    use parent 'Catalyst::Controller::REST';
    use DBIx::Class::ResultClass::HashRefInflator ();
    use POSIX 'strftime';

    __PACKAGE__->config->{map}{'application/vnd.ms-excel'} = 'SimpleExcel';

    sub books : Local ActionClass('REST') {}

    sub books_GET {
        my ($self, $c) = @_;

        my $rs = $c->model('MyDB::Book')->search({}, {
            order_by => 'author,title'
        });

        $rs->result_class('DBIx::Class::ResultClass::HashRefInflator');

        my @t = map {
            [ @{$_}{qw/author title/} ]
        } $rs->all;

        my $entity = {
            header => ['Author', 'Title'], # will be bold
            column_widths => [30, 50], # in characters
            rows => \@t,
    # the part before .xls, which is automatically appended
            filename => 'myapp-books-'.strftime('%m-%d-%Y', localtime)
        };

        $self->status_ok(
            $c,
            entity => $entity
        );
    }

In your javascript, to initiate a file download:

    // this uses jQuery
    function export_to_excel() {
        $('<iframe '
         +'src="/rest/books?content-type=application%2Fvnd.ms-excel">')
        .hide().appendTo('body');
    }

Note, the content-type query param is required if you're just linking to the action. It tells Catalyst::Controller::REST what you're serializing the data as.

DESCRIPTION

Your entity should be either an array of arrays, or the more embellished format described below and in the "SYNOPSIS".

If entity is a hashref, keys should be:

rows

Required. The array of arrays of rows.

Optional, an array for the first line of the sheet, which will be in bold.

column_widths

Optional, the widths in characters of the columns.

filename

The name of the file before .xls. Defaults to "data".

AUTHOR

Rafael Kitover, <rkitover at cpan.org>

BUGS

Please report any bugs or feature requests to bug-catalyst-action-serialize-simpleexcel at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Catalyst-Action-Serialize-SimpleExcel. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SEE ALSO

Catalyst, Catalyst::Controller::REST, Catalyst::Action::REST, Catalyst::View::Excel::Template::Plus, Spreadsheet::WriteExcel, Spreadsheet::ParseExcel

TODO

  • Split into mutliple overridable methods.

  • Multiple sheet support.

  • Autofit support (would require a macro.)

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc Catalyst::Action::Serialize::SimpleExcel

You can also look for information at:

COPYRIGHT & LICENSE

Copyright (c) 2008 Rafael Kitover

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.