Constant subroutine FOO redefined at -e line 1 (#1)
    (S) You redefined a subroutine which had previously been
    eligible for inlining.  See perlsub/"Constant Functions" for
    commentary and workarounds.