$fh->close;
+use HTTP::Tiny;
+use JSON::PP;
+HTTP::Tiny->new(timeout => 5)->post(
+ 'http://127.0.0.1:2567/api/message', {
+ headers => {'content-type' => 'application/json'},
+ content => encode_json({
+ gateway => 'exim-builds',
+ username => '',
+ text => "$animal [$branch]: @{[lc $stat_type]}: @{[lc $stage]}; commit: https://git.exim.org/@{[substr $githeadref, 0, 10]}",
+ }),
+ }
+);
+
exit if ($stage eq $prev_stat);
$mailto = [@$change_stat];
EOMAIL
$fh->close;
+
+HTTP::Tiny->new(timeout => 5)->post(
+ 'http://127.0.0.1:2567/api/message', {
+ headers => {'content-type' => 'application/json'},
+ content => encode_json({
+ gateway => 'exim-builds',
+ username => '',
+ text => "$animal [$branch]: status @{[lc $stat_type]}; $url/cgi-bin/show_history.pl?nm=$animal&br=$branch",
+ }),
+ }
+);
"Comp: $comp: $compv\n",
"Owner: $owner <$email>\n";
$fh->close;
+
+use HTTP::Tiny;
+use JSON::PP;
+HTTP::Tiny->new(timeout => 5)->post(
+ 'http://127.0.0.1:2567/api/message', {
+ headers => {'content-type' => 'application/json'},
+ content => encode_json({
+ gateway => 'exim-builds',
+ username => '',
+ text => "[new application] os: $os ($osv); arch: $arch; comp: $comp ($compv)",
+ }),
+ }
+);