Yet Another CPAN Grep

Mojo-Server-AWSLambda ( P/PR/PRAJITH/Mojo-Server-AWSLambda-0.01.tar.gz, PRAJITH, 2020; MetaCPAN )

Mojo-Server-AWSLambda/lib/Mojo/Server/AWSLambda/Response.pm ( view source; MetaCPAN )

esponse;

use Mojo::Base 'Mojo::Message::Response';
use Mojo::JSON qw(decode_json encode_json);

use MIME::Base64;
use Try::Tiny;
use JSON::Types;
use Encode;

sub output {
    my $self = shift;

ingleValueHeaders->{'content-type'};
    my $isBase64Encoded = $type !~ m(^text/.*|application/(:?json|javascript|xml))i;
    if ($isBase64Encoded) {
        $body = encode_base64 $body, '';
    }