class DarkRaha extends com { // разработка приложений
            String a="Главная" b="Контакты" c="О сайте"
};

основы

введение
инструментарий
типы данных
переменные
литералы
строки
массивы
отображения
ссылки
операции
управляющие операторы
функции
пакеты, модули

разное

переменные окружения
MySQL

Справочник по Perl

Управляющие операторы

блоковый оператор

Блоковый оператор {} обязателен при построении утверждений с использованием некоторых ниже приведенных операторов.

условные операторы

Условный оператор if позволяет выполнить оператор или блок операторов, если указанное выражение истинно. A если присутствует оператор else выполнить альтернативый оператор или блок операторов.

Если указанное условие является отрицанием какого-то выражения, то можно воспользоваться другим оператором perl - unless.

$a=25;
# if($a==25) print "$a equal 25"; - было бы ошибкой 
if($a==25) {print "$a equal 25";}
else {print "$a not equal 25";}

#вместо if(!($a==25))
unless(a==25) {print "unless: $a not equal 25";}
else {print "unless: $a equal 25";}

Оператор if можно заменить оператором && (логическое И), если else и блок операторов не нужны. Аналогично для оператора unless можно воспользоваться оператором || (логическое или).

$a=25;
$a==25 && print "a=25";
# ошибочные
#$a==25 && print "a=25"; && print "====";
#$a==25 && {print "a=25";}

циклы с предусловием

Оператор while выполняет блок операторов, пока указанное условие истинно. Оператор until выполняет блок операторов, пока указанное условие не истинно.

$a=1; 
while ($a > 0) {
$a = <>
chomp($a); # сравните результат без этой строчки 
print "\$a=$a\n";
}

циклы с постусловием

Оператор do {}while выполняет блок операторов, пока указанное условие истинно. Оператор do {}until выполняет блок операторов, пока указанное условие не истинно. В обоих случаях условие проверяется после выполнения блока, таким образом, тело цикла будет выполнено хотя бы один раз.

print "input 0 for exit\n";
do{
print "input number: ";
$a=<>;
}while($a>0);

цикл по счетчику

Перед первой итерации выполняется ициализирующее выражение. В начале каждой итерации проверяется условие, если оно истинно, то тело цикла выполняется. В конце каждой итерации выполняется, завершающее выражение.

# for(init_expr; cond; end_it;){
#...
#}
for($i=0;$i<10;$i++){
print "$i,";
}

цикл по элементам

В цикле по элементам foreach можно указать итератор, переменную в которую будет сохраняться значение каждого элемента массива. После завершения цикла значение переменной итератора возвращается в первоначальное.

@a=(1,2,"str");
$it=56;
foreach $it (@a){
print "$it\n";
}
print "after loop it=$it\n";

метки

Метки определяются как label_name:

MYLAB:
...

операторы last, next, redo

Оператор last позволяет выйти из текущего блока.

Оператор next позволяет перейти на следующую итерацию цикла.

Оператор redo позволяет перезапустить текущую итерацию.

Данным операторам можно явно указать метку перехода.

Под текущим блоком понимается тело цикла, кроме циклов с предусловием, или независимый блок, т.е. определенный сам по себе.


Рейтинг@Mail.ru