return encode_json(\%result) if lc($attrs{'format'}) eq 'json';

##</code><code>##

lc($attrs{'format'}) eq 'json' and return encode_json(\%result);

##</code><code>##

open(my $fh, '<', $file) or die "error opening '$file': $!";

##</code><code>##

return encode_json(\%result) if lc($attrs{'format'}) eq 'json';
return $result{'message'} or "$result{'api-key'}:$result{'session'}";