Форумы портала PHP.SU :: Версия для печати

Warning: Cannot use a scalar value as an array in /home/admin/public_html/forum/include/fm.class.php on line 757

Warning: Invalid argument supplied for foreach() in /home/admin/public_html/forum/include/fm.class.php on line 770
Форумы портала PHP.SU :: Версия для печати :: простое ветвление perl

Форумы портала PHP.SU » » Вопросы по Perl/Python/.NET » простое ветвление perl

Страниц (1): [1]

1. daglas1 - 04 Сентября, 2013 - 11:46:51 - перейти к сообщению

Всем привет.
Собственно по теме.

CODE (perl):
скопировать код в буфер обмена

if (($version =~ m/plus/i) && ($Soft_ID_SOFT!=5))
{
$err=5;
}

Вот такое ветвление есть и на него руагется перл.
По сути нужно одновременное выполение условий, Soft_ID_SOFT должен быть не равным 5, а в переменной version должна быть подстрока plus.

2. JustUserR - 17 Сентября, 2013 - 16:24:01 - перейти к сообщению

daglas1 пишет:

Вот такое ветвление есть и на него руагется перл.

В качестве возможной причины некорректного функционирования предполагаемого исходного кода на языке Perl, может являться отсутствие надлежащего объявление переменной $err, в соответствии с размещением указанных конструкций в программных блоках и функциях