#!/usr/bin/perl -w use strict; use diagnostics; use LinuxFocus::SDB; my $VERSION = "0.4"; my $db = LinuxFocus::SDB->new(); $db->load("../../data/lfdb.nl.xml"); $db->load("../../data/lfdb.en.xml"); $db->load("../../data/lfdb.persons.xml"); $db->setLang("nl"); my $to = "nl"; my $arts = 0; my $translatedarts = 0; print << "EOF"; LinuxFocus - NL: Status Vertaalslag

LinuxFocus Overzicht

Dit is een overzicht van alle LinuxFocus artikels. Artikels die al vertaald zijn, hebben een witte achtergrond. Een grijze achtergrond betekent 'nog niet vertaald' en artikels met een blauwe achtergrond zijn reeds gereserveerd voor vertaling, maar nog niet afgewerkt. Artikelen die een *M* voor hun naam hebben staan, zijn nog niet omgezet naar het .meta.html formaat.

U kan LinuxFocus helpen! Als je een artikel ziet dat nog niet vertaald is en je graag zelf zou vertalen, reserveer het dan voor u door een e-mail te sturen naar de Nederlandse mailing list op dutch\@linuxfocus.org.

LinuxFocus translators page

This is an index of all LinuxFocus articles. Already translated articles are shown with white background. Articles that are grayed are not translated yet and articles with blue background are reserved for translation but not yet ready.

You can help LinuxFocus! If you see an article that is not yet translated and you would like to translate it then reserve it for you by sending an e-mail to the person mentioned as maintainer at the end of this page.

EOF foreach my $month ($db->getMonthIDs(sort => "desc")) { if ($month =~ /2English/) { $db->setLang("en"); $to = "en"; } else { $db->setLang("nl"); $to = "nl"; } my $monthname = $db->getMonthName($month, "nl"); print << "EOF";

EOF foreach my $id ($db->getArticleIDs(month => $month, sort => "desc", coverpages => "yes")) { $arts++; $db->selectArticle($id); my $emurl = $db->getArticleRL("en", meta => "meta"); my $url = $db->getArticleRL("en"); my $murl = $db->getArticleRL("nl", meta => "meta"); my $title = $db->getArticleTitle(); my $color = "#C2C2C2"; my $translator = " "; my $proofread = " "; if ($db->getArticleTranslationDate(to => $to ) ne "") { $translatedarts++; $color = "#FFFFFF"; $translator = "getArticleTranslationPersonEmail(to => $to ) . "\">" . $db->getArticleTranslationPerson(to => $to ) . ""; $title = "getArticleRL("nl") . "\">" . $title . ""; } elsif ($db->getArticleTranslationReservationDate(to => $to ) ne "") { $color = "#AAAAFF"; $translator = "getArticleTranslationPersonEmail(to => $to) . "\">" . $db->getArticleTranslationPerson(to => $to) . ""; } if ($db->getArticleTranslationProofreadDate(to => $to) ne "") { $proofread = "getArticleTranslationProofreadPersonEmail(to => $to) . "\">" . $db->getArticleTranslationProofreadPerson(to => $to) . ""; } print << "EOF"; EOF } print << "EOF";

	$monthname	Vertaald door	Gecontroleerd
$id (meta)	$title (meta)	$translator	$proofread

EOF } my $percentage = int (($translatedarts / $arts)*100); print << "EOF";

Deze pagina is gemaakt met genmainindex, version $VERSION.

Deze pagina wordt onderhouden door: het Nederlandse LinuxFocus team

$translatedarts artikelen van de $arts = $percentage % vertaald

EOF