mod_perl: how to use environment variable

In httpd.conf:

PerlSetEnv PG_FLG 1

In mod_perl code:

sub is_pure_pg {
    return exists $ENV{PG_FLG};
}