I didn't expect the inner sub to be visible outside the outer sub. Thanks to the fine Perlmonks here, I've learned the error of my ways.