What do you suppose this does?  when ( /INCREMENT/ ) { \&increment( @_ ) }

How about  \&increment( @_ )

So, if you're trying to return a reference, don't take a reference to that reference, simply return the reference

return increment( @_ );
[download]