# Users should only see this if the programmer (me)
# f*cked up.
unless ($event) {
  croak “You EEEEEDIOT!!! Not enough args to _default()!”;
}

Source: Direct link to the source code
Software: Net-AIM
Programming language: Perl