LINUX.ORG.RU

Условия PERL


0

0

if ($port==1){$a=1};
elsif ($port==2){$a=2};
elsif ($port==3){$a=4};
elsif ($port==4){$a=8};
elsif ($port==5){$a=16};
elsif ($port==6){$a=32};
elsif ($port==7){$a=64};
elsif ($port==8){$a=128};

можно ли упростить подобный код?
★★

в 6-м перле по-моему свич появился

kto_tama ★★★★★
()
Ответ на: комментарий от anonymous

А! Ананимус самый догадливый аказался.. очень странно что топикстартер сам не догадался до такого решения с самого начала :)

Cy6erBr4in ★★★
()

Конкретно это - можно, что уже продемонстрировано.
Конструкции типа switch будут в перл6 и, по-моему, в последние версии перл5 внесены(точно не скажу - отправлю на perl.org).

anonymous
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.