if (! $s) { $return_code_of_print = print $q->redirect('https://example.net/test/err.html'); die $return_code_of_print; }