@ -67,4 +67,10 @@ sub trim {
return $line =~ s/(^\s+|\s+$)//or;
}
sub events {
my ($self) = @_;
return wantarray ? @{ $self->{events} } : $self->{events};
1;