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
    This gives access to ${^GLOBAL_PHASE} in versions of perl that don't
    provide it. 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 or XS that would fool this
    module for the INIT and END 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.