sub decoded_data {
my ($self) = @_;
return decode_json($self->data);
return $self->data ? decode_json( $self->data ) : undef;
}
=head3 set_encoded_data
sub set_encoded_data {
my ( $self, $data ) = @_;
return $self->data( encode_json($data) );
return $self->data( $data ? encode_json($data) : undef );
=head3 job_type
-