Как отобразить платежный код в бланке настроек?

[a_eugene]

Как отобразить персональный платёжный код в бланке настроек?
v50.32

[0xbad0c0d3]

Очень просто
Открываешь файлег: operations.pl
Ищешь такие строки:

Код:

223  $pass=&Filtr_out($p->{"AES_DECRYPT(passwd,'$Passwd_Key')"});
224  $name=&Filtr_out($p->{name}) || '&nbsp';

После них рисуешь:

Код:

225  $ppc+=$_ foreach ($Fid=~(m/./g));
226  $ppc = $Fid.($ppc%10);

Идешь ниже, к строкам:

Код:

234     foreach $i (split/\n/,$grp_blank_mess)
235     {

И после них рисуешь:

Код:

236        $i=~s|\$ppc|$ppc|;

Ну, а дальше в настройках группы пишешь:

Код:

Платежный код|$ppc

[a_eugene]

Спасибо - все заработало.

[Sokol]

Сделал себе в 49й, код появился но остальной текст не помещается
Подскажите как в бланк добавить  н-ное количество строк?

[LtyM]

Не используйте переменные "ppc". У меня начало читать первый символ и показывать пароль.

[0xbad0c0d3]

\b в регекспе. т.е.

Код:

$i=~s|\$p\b|$pass|;
$i=~s|\$l\b|$name|;
$i=~s|\$i\b|$ipp|;
$i=~s|\$d\b|$dns|;
$i=~s|\$g\b|$gate|;
$i=~s|\$m\b|$mask|;
$i=~s|\$ppc\b|$ppc|;

либо

Код:

$i=~s|\$ppc|$ppc|;

сделать перед

Код:

$i=~s|\$p|$pass|;