my $seen_event_one;

sub event_one {
   $seen_event_one++;
   # rest of event handler here
}
sub event_two {
   return unless $seen_event_one;
   # rest of event handler here
}