Make update-deps-releases.pl work with older perl

diff --git a/tools/update-deps-releases.pl b/tools/update-deps-releases.pl
index 3536ed101dc86a9ff3e9d88227e241db76ea968a..e22cef424ddfbb40ca5512ee9ee32adc08472151 100755 (executable)
--- a/tools/update-deps-releases.pl
+++ b/tools/update-deps-releases.pl
@@ -11,7 +11,7 @@ use Data::Dumper qw(Dumper);
 use Carp;
 use Term::ANSIColor;
 use Term::ReadKey;
-use List::Util qw(first unpairs);
+use List::Util qw(first);
 use Clone qw(clone);
 
 sub get_deps {
@@ -467,7 +467,7 @@ while (1) {
                 for my $op (@operations) {
                     update_changelog($op->{dep}, $op->{version}, @{$op->{reasons}})
                         if @{$op->{reasons}};
-                    update_deps_versions(".deps-update/$op->{dep}/rebar.config", unpairs(@{$op->{operations}}))
+                    update_deps_versions(".deps-update/$op->{dep}/rebar.config", map {@{$_}[0,1] } @{$op->{operations}})
                         if @{$op->{operations}};
                     if ($git_info->{$op->{dep}}->{last_tag} ne $op->{version}) {
                         update_app_src($op->{dep}, $op->{version});