All pastes #168451 Raw Edit

Miscellany

public text v1 · immutable
·published 2006-09-13 00:16 UTC
rendered paste body

sub error {
  shift;
  my @r;
  (exists $ERRMSG->{$_} && push @r, $ERRMSG->{$_})
    or croak "Unknown Error code '$_'"   
      foreach(@_ ? @_ : @$ERR);
  @r
}