Welcome to the homepage of Petri, Teiju, Mikael and Markus Helenius
<%perl> use IVG; my $d = &IVG::connect(); print "
"; print "
Gallery name
Last updated
\n"; foreach my $keyword ("bestof","teiju","adelaide","sydney","verbier","asm06","talo","wedding","hurghada","crete06") { my ($i,$u) = &IVG::keywordsummary($d,$keyword); print qq{
$keyword
$u
}; } print "
"; &IVG::disconnect($d); %perl>
Teiju's page
.
pete@he.iki.fi