Do you fully understand the reason for that warning? Perl is telling you that it may already have in-lined this sub and that your change is no longer guaranteed to actually change the value of FOO. You should only ignore this warning if you are certain that you are NOT changing the value of any constant subroutine.