The direct problem with your original code is that you are trying to post the data incorrectly. The query should be posted directly as the body content of a POST, not as a query parameter. This can be done with the post method using the content option.

my $http = HTTP::Tiny->new;
my $res  = $http->post($url, { content => $query });
[download]