From 6e367459b47ecf9a18e5805092f67a53fa127d8d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Thu, 22 Jun 2017 13:52:36 +0200
Subject: simplify: use //= where appropirate

---
 urpm/util.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/urpm/util.pm b/urpm/util.pm
index 931a0bc0..c786227b 100644
--- a/urpm/util.pm
+++ b/urpm/util.pm
@@ -65,7 +65,7 @@ sub reduce_pathname {
     #- clean url to remove any macro (which cannot be solved now).
     #- take care if this is a true url and not a simple pathname.
     my ($host, $dir) = $url =~ m|([^:/]*://[^/]*/)?(.*)|;
-    $host = '' if !defined $host;
+    $host //= '';
 
     #- remove any multiple /s or trailing /.
     #- then split all components of pathname.
-- 
cgit v1.2.1