Обсуждение шаблона:Портал/корген.pl

Этот скрипт позволяет быстро добавить новый параметр для всех коробочек шаблона {{Портал}}. Или увеличить максимальное количество этих коробочек.

Использование:

1. perl файл_скрипта л
2. perl файл_скрипта п
3. perl файл_скрипта н

#! /usr/bin/perl

my $l = $ARGV[0] || "л";
my $last = $l eq "н" ? 3 : 9;
for($i = 1; $i <= $last; $i ++)
{
print "{{Портал/Коробочка|
  | тип = {{{$lкор$i\_тип|}}}
  | заголовок = {{{$lкор$i\_заголовок|}}}
  | без_править = {{{без_лкор$i\_править|}}}
  | стиль = {{{$lкор$i\_стиль|}}}
  | стиль_текста = {{{$lкор$i\_стиль_текста|}}}
  | текст = {{{$lкор$i\_текст|}}} 
  | шаблон = {{{$lкор$i\_шаблон|}}}
  | значок = {{{$lкор$i\_значок|}}}
  | категория = {{{категория|}}}
  | категория_участников = {{{категория_участников|}}}
}}\n";
}