SZ
Как по-твоему в перле пишут switch?
Size: a a a
2021 May 26
a
Ну, иногда нужно. Например когда сделал свой EDSL и не хочешь, что бы кто-то (например сам через полгода) облажался с return.
А
Есть ли где-то какая-то статистика или может наблюдения по поводу миграции перл разработчиков/проэктов из других языков и в другие языки?
NP
if (($FORM{SITY} && $FORM{ACCOUNT} && $FORM{SYSTEM} && $FORM{DATE_FROM} && $FORM{DATE_BY}) eq '') {Мне нужна конструкция если в хеше
FORM именно эти ключи пустные, но я так понимаю делаю не правильно, может кто подскажет что не так?АК
eq '' в каждый.
АК
Ещё есть вот такая идея, за синтаксис не ручаюсь:
sub all_empty
{
my($hash,@keys) = @_;
foreach my $key in (@keys){
if(exists($hash->{$key}) && ($hash->{$key} ne '')){
return false;
}
}
return true;
};
if(all_empty(\%FORM,qw(SITY,ACCOUNT,SYSTEM,DATE_FROM,DATE_BY))) {
NP
Спасибо
АК
Исправил. Теперь читатель передаёт в очередь в том числе указатель на собственно выделенную структуру, куда писатель скопирует ему все нужные данные. После чего писатель просто просингнализирует событием, а проснувшемуся читателю уже не понадобится обращаться к очереди, потому что у него будет своя копия результата.
А
идея плохая, при первом установленном значении будет
return false. все остальные ключи не будут проверятьсяА
задачу лучше вывернуть в другую сторону,
if ($FORM{SITY} && $FORM{ACCOUNT} && $FORM{SYSTEM} && $FORM{DATE_FROM} && $FORM{DATE_BY}) { print "GOOD" } else { print "BAD" }А
если все поля установлены, и не пустые, то делаем что-то, в противном случае умираем, варнинг пишем и т.д.
А
или если надо наоботор то unless
($FORM{SITY} && $FORM{ACCOUNT} && $FORM{SYSTEM} && $FORM{DATE_FROM} && $FORM{DATE_BY}) {print "BAD" }АГ
если ключи будут разные, то лучше через цикл и счётчик ну или как в примере выше, как только условие нарушено заканчиваем перебор
А
ну тогда надо не
all_empty, а exists_empty назвать назвать, и поменять ne на eq, и true и false местамиАГ
Только там проверятеся на пустую строку, а ещё бы на undef проверить
А
ну в моем случае все собираеться через &&, и соответственно проверяеться и на пустоту и на undef
АГ
Там всё логично, функция отвечает все пустые или нет, и как только она встречает НЕ пустой, возвращает false
АГ
и конечно же обрабатывается ситуация с 0)
А
я бы сказал что задача поставленна была некоректно 🙂
АГ
Это уже другой вопрос)