Re^5: How do I pretend a reference isn't a reference

in reply to Re^4: How do I pretend a reference isn't a reference
in thread How do I pretend a reference isn't a reference

That's not what my code does, nor was I saying that $c was one thing at compile time and one at run time. This is what I do:

   # init the app
   sub _ { 'compile time '.@_};

   my $compile = _(1);
   sub foo { _(1) };

   # finished compiling, so redefine sub _
   sub _ { 'run time '.@_};

   # run the code
   my $run = foo();
   print " $compile - $run\n"

__END__

 compile time 1 - run time 1
[download]

UPDATE: Meant to reply to Re^5: How do I pretend a reference isn't a reference

Comment on Re^5: How do I pretend a reference isn't a reference Download Code

In Section Seekers of Perl Wisdom