Select Code to Download

Can't find label CODE(0x81678a0) at sub.pl line 13.

            Rate refcall   named    goto
refcall 708190/s      --     -1%    -10%
named   717414/s      1%      --     -9%
goto    790676/s     12%     10%      --

    my $ref = *function{'CODE'}; # get a reference 
    goto $ref;                   # magic goto to that reference

    my $ref = \&{$coderef};      # get a reference (\&{&$ref} without 
+the call)
    goto $ref;                   # magic goto to that reference

    goto $ref;                   # we have a code reference, just use 
+that

--- g_ref.Dtls
+++ g_amp.Dtls
...
     =>  \CV(__ANON__)  
 (foo.pl:5)     goto
 (foo.pl:5)     (Found sub #1)