defineobs-perl.png