file: code/BadExample/FindNewSeries.pm 11: sub run { 12: my ($self) = @_; 13: my $html = $self->fetch; 14: my $data = $self->find($html); 15: $self->write($data); 16: }
run method calls all other methods