sub handle_request { ... my $html = '...'; ... return [ 200, ['Content-Type','text/html'], $html] }; ##

##

sub handle_request {
    ...
    my $html = '...';
    ...
    return [ 200, ['Content-Type','text/html'], [$html]]
};