i wouldn't use a BEGIN block, since it's a lexical space and variables declares with my are not visible from your main code. but besides that i think this is quite sane.