Use readonly functionality built into perl 5.8.x and up