NAME

WebApp::Helpers::MimeTypes - simple role for MIME::Types support

SYNOPSIS

package MyTunes::Resource::CD;

use Moo;
with 'WebApp::Helpers::MimeTypes';

sub to_excel {
    my ($self) = @_;

    my ($filehandle) = $self->make_temp_file();
    return [
        200, ['Content-Type' => $self->mime_type_for('xlsx')],
        [ $filehandle ],
    ];
}

DESCRIPTION

WebApp::Helpers::MimeTypes is a simple role that holds a MIME::Types object and provides some sugar methods. I work a lot with Microsoft Excel 2007 files, and I hate trying to remember their mime-type (application/vnd.openxmlformats-officedocument.spreadsheetml.sheet).

ATTRIBUTES

mime_types

A MIME::Types object.

METHODS

mime_type_for( $extension )

Returns the MIME type for a file with the given $extension e.g. mime_type_for('csv') returns 'text/comma-separated-values'.

LICENSE

Copyright (C) Fitz Elliott.

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

AUTHOR

Fitz Elliott felliott@fiskur.org