# hardcoded operation for routing: my ($if_question, $if_answer, $then_question, $else_question) = get_hardcoded_logic(); if (get_answer($if_question) eq $if_answer) { set_next($then_question); } else { set_next($else_question); }