Perl の様々な Tips

パッケージ作成編

Config の変数を見るには

perl -MConfig -e 'print Config::config_sh()'

mod_perl

  • Apache::Registry 内で 404 Not Found を返すには
    my $r = Apache->request;
    $r->content_type('text/html');
    $r->status(404);
    $r->send_http_header;