At least one of the animals uses a locally installed Perl
version, that is reachable via $PATH
else {
# if we're the merge base, the ff-only should work
system('git pull --ff-only') == 0 or die $? >> 8;
else {
# if we're the merge base, the ff-only should work
system('git pull --ff-only') == 0 or die $? >> 8;
say "$0: re-execute after update";
chdir $CALLED{cwd} or die "$0: Can't chdir to $CALLED{cwd}: $!\n";
exec $CALLED{argv0}, @{$CALLED{argv}};
say "$0: re-execute after update";
chdir $CALLED{cwd} or die "$0: Can't chdir to $CALLED{cwd}: $!\n";
exec $CALLED{argv0}, @{$CALLED{argv}};
See accompanying License file for license details
See accompanying License file for license details
use vars qw($VERSION); $VERSION = 'REL_0.1';
use vars qw($VERSION); $VERSION = 'REL_0.1';