bin/ovh-api

diff --git a/bin/ovh-api b/bin/ovh-api
index b5522f18a567ed60f6239cf69f317d6ab6025187..d8850a4fbcd57a57596d8e959e448716a4e07d4d 100755 (executable)
--- a/bin/ovh-api
+++ b/bin/ovh-api
@@ -125,7 +125,7 @@ sub _query {
     $id = check_row($url,$id);
     next unless defined $id;
 
-    $id =~ s,/.*$,,;
+# NB 27.06.17     $id =~ s,/.*$,,;
     eval {
       $response = $Api->rawCall(path=>$url.'/'.$id,method=>($method||'GET'),body=>{});
     };
@@ -310,7 +310,6 @@ my @tbs = (
         }
 
         if (!defined $val) {
-# NB 09.02.17 no use of COALESCE          $val = 'NULL';
           $val = "''";
 
         } elsif($fd->{sql} =~ /BOOLEAN/) {
@@ -356,7 +355,10 @@ sub check_row {
 
   # Scalar
   return undef if $url eq '/ip' and $id !~ /\d+\./;
-  $id =~ s,/.*$,,;
+
+# NB 27.06.17   $id =~ s,/.*$,,;
+  $id =~ s,/32$,,;
+
   return $id;
 }