Совместимость с perl 5.10