package Foo; use HTML::Template; sub run{ my @html = ; my $template = HTML::Template->new(arrayref => \@html); print $template->output; } 1; __DATA__