Talk:List of XEPs

Генерация списка

Копипаст оригинального списка прогнать через этот скрипт:

#! /usr/bin/env perl

while ( <> )
{
	split '\t';
	
	chop @_;
	$xep = $_[0];
	$name = $_[1];
	$type = $_[2];
	$status = $_[3];
	$date = $_[4]; # ignored
	
	# XEP -> template
	$xep =~ /XEP-([0-9]{4})/;
	$xep = "{{xep|$1}}";
	
	# add place for the russian translation
	$name = $name."<br/> ";
	
	# type and status translation, according to Terms
	%TypeTranslation =
	(
		"Historical",		"Историческое",
		"Humorous",		"Шуточное",
		"Informational",	"Информационное",
		"JIG Formation",	"Формирование JIG",
		"Procedural",		"Процедурное",
		"Standards Track",	"Основное"
	);
	%StatusTranslation =
	(
		"Active",		"Действующее",
		"Deferred",		"Отложенное",
		"Deprecated",		"Отменённое",
		"Draft",		"Черновик",
		"Experimental",		"Экспериментальное",
		"Final",		"Окончательное",
		"Obsolete",		"Устаревшее",
		"Proposed",		"Предложенное",
		"Rejected",		"Отклонённое",
		"Retracted",		"Отозванное"
	);
	
	$typeTranslated = $TypeTranslation{$type};
	$statusTranslated = $StatusTranslation{$status};
	
	# type, status links and classes
	$typeClass = 'type_'.$type;
	$statusClass = 'status_'.$status;
	$type = "[[XEP#Типы|$typeTranslated]]";
	$status = "[[XEP#Статусы|$statusTranslated]]";
	$typeClass =~ s/ /_/g;
	$statusClass =~ s/ /_/g;
	
	# outting table row
	print "|-\n";
	print "|class='$typeClass $statusClass'| $xep || $name || $type || $status\n";
}