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