diff --git a/lib/Subtitle/BASE.pm b/lib/Subtitle/BASE.pm
index abb9b7e..fc93852 100644
--- a/lib/Subtitle/BASE.pm
+++ b/lib/Subtitle/BASE.pm
@@ -67,4 +67,10 @@ sub trim {
   return $line =~ s/(^\s+|\s+$)//or;
 }
 
+sub events {
+  my ($self) = @_;
+
+  return wantarray ? @{ $self->{events} } : $self->{events};
+}
+
 1;