=cut
use strict;
+use URI::Escape;
use vars qw($VERSION); $VERSION = 'REL_0.1';
my $content =
"changed_files=$changed_this_run&"
. "changed_since_success=$changed_since_success&"
- ."branch=$branch&res=$status&stage=$stage&animal=$animal&ts=$ts"
+ . 'branch=' . uri_escape($branch) . "&res=$status&stage=$stage&animal=$animal&ts=$ts"
."&log=$log_data&conf=$confsum";
my $sig= sha1_hex($content,$secret);