sub parse_template($;$) {
	my $filename = shift;
	my $vars = shift || {};
	my $parsed;

	$template->process($filename, $vars, \$parsed) or die 'Couldn\'t open template: ' . $template->error();

	return $parsed;
}