The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

use strict;
BEGIN {
use Exporter();
use vars qw (@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
@ISA = qw(Exporter);
@EXPORT_OK = qw();
@EXPORT = qw (
STATE_FINI
STATE_POST_ENGINE_INIT
STATE_PRE_INIT
STATE_INIT
STATE_POST_INIT
STATE_CACHED_PAGES
STATE_ACTION
STATE_REDIRECT
STATE_DECLINED
STATE_SET_HEADERS
STATE_PRE_PROCESS
STATE_PROCESS
STATE_POST_PROCESS
STATE_CHECK_STATUS
STATE_OUTPUT
STATE_SEND_STATUS
);
%EXPORT_TAGS = qw();
}
use constant {
STATE_FINI => 0,
STATE_POST_ENGINE_INIT => 1,
STATE_PRE_INIT => 2,
STATE_INIT => 3,
STATE_POST_INIT => 4,
STATE_CACHED_PAGES => 5,
STATE_ACTION => 6,
STATE_REDIRECT => 7,
STATE_DECLINED => 8,
STATE_SET_HEADERS => 9,
STATE_PRE_PROCESS => 10,
STATE_PROCESS => 11,
STATE_POST_PROCESS => 12,
STATE_CHECK_STATUS => 13,
STATE_OUTPUT => 14,
STATE_SEND_STATUS => 15
};
1;