PERL was too clever by half, but if you leaned into making it readable, there were lots of tricks that could help.
do_register() unless invalid()
do_send_email() unless email_down()
do_login() unless password_to_short()
... it wouldn't be the way you'd do it today, but if used "tastefully", they were helpful!