Perl CGI Issue

How can I get my Perl CGI script (that will be running via mod_perl) to send a 404 status code for an error page? The ways that I have tried don't display this in the access_log or don't send the code at all.

Any correct way of doing this?

Thanks.

                        _    _
                       ( \__//)
                        .'     )
                    __/p q  .  )
                   (_p_`,     .)
                    `--'-,-'  )
                         (.  )
                        (   )
        LLAMAS         (   )
         FOR           ( . )         .---.
        OBAMA         (    )        (     )
                      (   . )      (  .    )
                      (      )    (      .  ),
                      ( .     `"'`  .       `)
                       (      .              .
                       ((  .      .   (   . 
                       ((       .    (      
                        ((     )     _( .   .