sub parseNode
{
	my $node_id = shift();
	my $node = XMLin( "$node_id.xml", searchpath => ['nodes'], forcearray => ['field', 'child'] );
	
	my $template = HTML::Template->new( filename => "$node->{type}{id}.html" );

	$template->param(
		node_id => $node->{id},
		type => $node->{type}{content},
		type_id => $node->{type}{id},
		title => $node->{title},
		created => &parseTimeBySeconds($node->{created}),
		updated => &parseTimeBySeconds($node->{updated}),
		owner => $node->{owner}{content},
		owner_id => $node->{owner}{id}
		);
	
	foreach ( keys( %{$node->{data}{field}} ) )
	{
		$template->param( $_ => $node->{data}{field}{$_}{content} );
	}

	my $children = '';

	foreach ( keys( %{$node->{data}{child}} ) )
	{
		$children = $children . &parseNode($node->{data}{child}{$_}{content});
	}

	$template->param( children => $children );
	return $template->output();
}