El método _default_for
permite acceder al valor por defecto.
28 sub _default_for {
29 my ($self, $attr) = @_;
30
31 return $_defaults{$attr}[0];
32 }
Casiano Rodríguez León
Principios de Programación Imperativa, Funcional y Orientada a Objetos Una Introducción en Perl/Una Introducción a Perl
por Casiano Rodríguez León
is licensed under a Creative Commons Reconocimiento 3.0 Unported License.
Permissions beyond the scope of this license may be available at http://campusvirtual.ull.es/ocw/course/view.php?id=43.
2012-06-19