my $obj = CLASS->new( ... ) or die CLASS->errstr;