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>