johan

Langgt 23

---more info---

venu

storgatan 27

---more info---

kent

nygatan 46

---more info----

johan ece ---more info--

##

#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper; 
use XML::Simple;
use XML::Fast;
use Template;
my $data="some xml data";
my $xml = new XML::Simple;
my $data = $xml->XMLin("$data", ForceArray =>['name','address'],);

#print Dumper($data);
my $template = Template->new();
my $filename = 'output1.tex';
$template->process(\*DATA, $data, $filename)
    || die "Template process failed: ", $template->error(), "\n";
	
	system( "pdflatex $filename" );
__DATA__

\documentclass[a4paper,leqno,twoside]{article}
\usepackage[latin1]{inputenc}
\usepackage[english]{babel}
\usepackage{multirow}
\renewcommand{\familydefault}{\sfdefault}
\usepackage{color}
\usepackage[colorlinks=true]{hyperref}
\begin{document}

[% FOREACH st IN details %]
[% st.name %]
[%st.address%]
---more info---
[%END%]