view release on metacpan or  search on metacpan

lib/Parse/IRCLog/Result.pm  view on Meta::CPAN

# the Result object.
#
# =cut

sub new {
  my $class = shift;
	my @events = @_;
  return if ref $class;
	return unless @events;

  bless { events => \@events } => $class;
}

# =method events
#
# This method returns the list of events in the result set.
#
# =cut

sub events {
  my $self = shift;