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!