my $options = HTTP::Headers->new(
  "Accept" => "application/json",
  "User-Agent" => "TeleHeater/2.2.3"
);
$ua->default_headers($options);