my ($errortype) = /^(\d+)/;