The statement $self = @_; sets it equal to the number of arguments.

Well, that statement would, but that statement didn't appear in the OP's post. He had my ($self) = @_; which is list context and assigns the first element of @_ to $self.

-sauoq
"My two cents aren't worth a dime.";