El código asociado a la charla que imparto sobre programación orientada a objetos ¡versión Perl!