use strict;
use vars qw($DEBUG);
+use Carp;
use Storable qw(nfreeze);
use MIME::Base64;
use JSON;
bless $self, $class;
- die "CGI object required as second argument" unless $self->{'cgi'};
+ croak "CGI object required as second argument" unless $self->{'cgi'};
return $self;
}