"my" variable $self masks earlier declaration in same scope at test.pl line 204, <DATA> line 21937.