#!/usr/bin/perl use strict; use warnings; use utf8; use Pod::Simple::HTML my $pod_html_output; my $content = <>> =cut CONTENT my $pod_html = Pod::Simple::HTML->new; $pod_html->output_string(\$pod_html_output); $pod_html->parse_string_document($content); print $pod_html_output;