my %params;
  if ( $params{content} ) { $request{content} = $params{content} }

  if ( $params{username} )   { $request{username}   = $params{username} }
  if ( $params{avatar_url} ) { $request{avatar_url} = $params{avatar_url} }
  if ( $params{tts} )        { $request{tts}        = JSON::PP::true }

##</code><code>##

my @valid_keys = qw< content username avatar_url >;

my %request = map { $_ => $params{$_} } grep { $params{$_} } @valid_keys;
$request{tts} = $params{tts} ? JSON::PP::true : JSON::PP::false;


##</code><code>##

use String::Random;

my $boundary = String::Random->new->randregex('[A-Za-z0-9]{32}');