package Trog::Renderer::blob; use strict; use warnings; no warnings 'experimental'; use feature qw{signatures state}; =head1 Trog::Renderer::blob Render blobs, such as files stored in a DB. =cut # TODO use the streaming code from Trog::FileHandler, etc. sub render (%options) { my $code = delete $options{code}; my $headers = delete $options{headers}; my $body = $options{body}; return [ $code, [$headers], [$body] ]; } 1;