use strict;
use warnings;
use Template;
my $tt = Template->new();
my $data =
[ {
city => 'thiscity',
country => 'thiscountry',
lat => 'thislat',
long => 'thislong',
name_urls => [
[ '', 'info1', 'info2', '', '', ['url1','url2','url3']],
[ '', 'info3', 'info4', '', '', ['url5','url6','url7']]
]
},
{
city => 'thatcity',
country => 'thatcountry',
lat => 'thatlat',
long => 'thatlong',
name_urls => [
[ '', 'info1', 'info2', '', '', ['url1','url2','url3']],
[ '', 'info3', 'info4', '', '', ['url5','url6','url7']]
]
},
];
$tt->process(\*DATA, {types => $data}, 'test.html') or die $tt->error(), "\n";
__DATA__
[% USE Dumper -%]
City/Locale | Country code | latitude | longditude | Identity details |
[% FOREACH type IN types -%]
[% FOREACH nu IN type.name_urls %]
[% nu.1 %] |
[% nu.2 %] |
[% FOREACH id IN nu.5 %]
- [% id %]
[% END -%]
|
[% END -%]
|
[% type.city %] |
[% type.country %] |
[% type.lat %] |
[% type.long %] |
[% END -%]