Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

use Perl Log In

Log In

[ Create a new account ]

jhorwitz (4227)

jhorwitz
  reversethis-{gro.gnihsams} {ta} {ffej}
http://www.smashing.org/

System administrator, Perl hacker, author of "Unix System Management Primer Plus" (SAMS 2003), mod_parrot, extproc_perl, Authen::Krb4, Authen::Krb5.

Journal of jhorwitz (4227)

Thursday December 23, 2004
09:39 AM

article

[ #22431 ]
My mod_parrot article is finally up on perl.com. Enjoy!
The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • good article - nice work.
  • I followed everything up until this, at the end of the authentication example:

    # authentication failed
    auth_failure:
        $I0 = ap_constants['HTTP_UNAUTHORIZED']
        goto auth_return_status

    # return our status code
    auth_return_status:
        $I0 = ap_constants['OK']
        .pcc_begin_return
            .return $I0
        .pcc_end_return
    .end

    Wouldn't this return ap_constants['OK'] even when the authentication fails? ($I0 gets assigned that value in both cases

    --
    mirod