The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Devel::GlobalPhase - Detect perl's global phase on older perls.

SYNOPSIS

    use Devel::GlobalPhase;
    print global_phase; # RUN

    use Devel::GlobalPhase -var;
    print ${^GLOBAL_PHASE}; # RUN

DESCRIPTION

Gives you the value perlvar/${^GLOBAL_PHASE} would in perls it doesn't exist in. The built in variable will be used if it is available.

If all that is needed is detecting global destruction, Devel::GlobalDestruction should be used instead of this module.

EXPORTS

global_phase

Returns the global phase either from ${^GLOBAL_PHASE} or by calculating it.

OPTIONS

-var

If this option is specified on import, the global variable ${^GLOBAL_PHASE} will be created if it doesn't exist, emulating the built in variable from newer perls.

BUGS

There are tricks that can be played with B that would fool this module for the INIT phase.

AUTHOR

haarg - Graham Knop (cpan:HAARG) <haarg@haarg.org>

CONTRIBUTORS

Uses some code taken from Devel::GlobalDestruction.

COPYRIGHT

Copyright (c) 2013 the Devel::GlobalPhase "AUTHOR" and "CONTRIBUTORS" as listed above.

LICENSE

This library is free software and may be distributed under the same terms as perl itself.

1 POD Error

The following errors were encountered while parsing the POD:

Around line 129:

alternative text 'perlvar/${^GLOBAL_PHASE}' contains non-escaped | or /