use CGI::SSI (autotie => STDOUT);

##</code><code>##

Failed to copy the filehandle (ATRACK::STDOUT): Invalid argument at /usr/share/perl5/CGI/SSI.pm line 74.