view release on metacpan or  search on metacpan

lib/App/FakeCDN.pm  view on Meta::CPAN

}

sub get_content {
    my ($self, $path, $query) = @_;

    my $mime_type = Plack::MIME->mime_type($path) // 'application/octet-stream';
    my $is_binary = is_binary($mime_type);

    unless ($is_binary) {
        my $encoding = $self->encoding || 'utf-8';
        $mime_type .= "; charset=$encoding";
    }

    my $content = $self->get_stuff($path, $query);

    ($content, $mime_type);
}

sub is_binary {
    my $mime_type = shift;