no warnings "redefine";

Doesn't work for constant subroutines. Yes. It is an unusual requirement to redefine a constant ;)

like I said, it doesn't work from outside. for constants the redefinition happens in constant.pm.
you could delete $main::{C}

Also note that "redefining" a constant does not necessarily do what BrowserUk wants. The constants get inlined, so redefining them only works from that point on:

use constant C => 1;
sub c { C };

use constant C => 2;
sub d { C };

print c(); # 1
print d(); # 2
[download]

like I said, it doesn't work from outside. for constants the redefinition happens in constant.pm.

I'm not using the constant pragma.

---

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority".

In the absence of evidence, opinion is indistinguishable from prejudice.

RIP Neil Armstrong