mod_perl: how to use environment variable

In httpd.conf:

1	PerlSetEnv PG_FLG 1

In mod_perl code:

1 2 3

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