If your line 23 looks something like this:

... the error message means that $self contains an undefined value. If you use the strict pragma, Perl will tell you that you haven't declared a variable named $self in that scope. That's the most likely explanation as to why its value is undefined.